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SUMMARY 

A mathematical model of the three-dimensional dynamics of 
a high-altitude scientific research halloon system perturbed 
from its ec!.^^i librium configuration by an arbitrary gust load- 
ing is developed. The platform is modelled as a system of 
four coupled pendula. The equations of motion are developed 
in the Lagrangian foimalism assuming a small-angle approxi- 
mation. Three-dimensional pendulation, torsion and precession- 
al motion 'due to Coriolis forces are considered. Aerodynamic 
and viscous damping effects on the pendulatory and torsional 
motions are included. 

A general model of the gust field incident upon the ball- 
oon system is also developed. 

The report is concluded with a description of the, digital 
computer simulation program and a guide to its use. 


INTRODUCTION 


The use of high-altitude balloon systems as stable platforms 
for scientific studies of the earth's atmosphere requires a 
knowledge of the dynamics of the system for proper data interpre- 
tation, This knowledge, is especially critical in studies of the 
vertical distributions of atmospheric trace constituents and 
temperatirce, since data interpretation is highly sensitive to the 
attitude of the data-collecting instrument. It is well known that 
most systems remain stable at float altitude, but we need a math- 
ematical model which can predict the attitude and motion of the 
system with sufficient accuracy to assure accurate interpretation 
and reduction of data. 

In reality* the motion of a perturbed balloon syst^i at float 
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altitude is extremely complex, involving interactions laetween 
several different types of oscillation such as hounce, pendu— 
lation, rotation and precession* Further complexity may he intro- 
duced hy such factors as damping (boundary layer) forces, air 
turbulence, cable elasticilgr and motion induced by the support 
mechanisms of the system (i*e., independent motion of a partic- 
ular system element). 

A number of models have been proposed to account for some of 
these factors. Morris and Stefan (ref. have: studied plane 
pendulation, bounce, plane torsional motion (including damping) 
and the atmospheric environment for a two element system (ball- 
oon and gondola). Smslie, et.al. (ref. 2) have analytically and 
experimentally considered balloon bounce, the thermodynamics of 
the enclosed gas, and heat transfer between atmosphere, balloon 
fabric and enclosed gas. The azimuthal rotations of a balloon- 
gondola system have been studied in detail, both theoretically 
and experimentally, by G-eimeles, et.al. (ref .3), with particular 
emphasis on the aerodynamic damping and inertia of the system. 
Further study of the aerodynamic parameters of a rotating sphere 
has been done by several investigators (refs. 4, 5, 6, 7, 8 and 9), 

To date, there appears to have been no serious effort to 
develop a detailed general model defining the gross motions of a 
balloon system in three dimensions. This report is intended to 
develop such a model. Admittedly, the model will not be completely 
general, but as further work is done on this subject, we may ex- 
pect further sophistication and generality in a three-dimensional 
model. The balloon system considered in this report is the WASA- 
langley/AFGSHIi lACATE (Lower Atmosphere Composition And Temperature 
Experiment) system which is to be flown at 150 km altitude. The 
system consists of a 39 million cubic foot, capaciiy balloon, a 
“load bar" containing balloon control equipment and cable reel, a 
gondola recovery parachute package and a research payload gondola. 
This system is configured as a system of four coupled pendula. 

A c-ursory derivation of the equations of motion (EOM) for 
plane damped pendulation for this system was done by Hinton of 
HASA-Langley. This report will investigate (1) three-dimensional 
pendulation, (2) torsional motion, (3) aerodynamic and viscous 
damping effects on pendulatory and torsional motion, and (4) pre- 
cessional motion due to Coriolis forces. We shall also attempt 


to develop a detailed general model for gust loading in three 
dimensions and study possible gust loading configurations. Since 
we are concerned primarily with the gross motions of the system, 
we will not investigate such factors as cable elasticity, statis 
tical variation or turbulence in the gust field, bounce or atmos 
pheric thermodynamics. This is done in the interest of keeping 
the analysis mathematically tractable. 
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balloon-to loadbar cable length = 72 feet 
surface area of kth element 

dynamic coupling coefficient matrix 
atatic coupling coefficient matrix 
parachute package-to-payload cable length = 5 feet 
drag coefficient of kth element 

damping matrix 

loadbar-to-parachute package cable length = 1310 feet 
Coriolis force 

gravitational acceleration at float altitude 
length of kth cylinder 

moment of inertia of kth element 

impulsive torque 
mass of kth element 
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torque 

linear impulse 

generalized coordinate of kth element 
nonconservative force on kth element 
balloon radius = 210 feet 
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radius of ktli cylinder 
time. 

kinetic energy 

linear velocity of kth element 

potential energy 
Cartesian coordinates! 

distance from element center of mass (azimutii plane) 
damping constant of kth element 

deflection angle off vertical, kth element 

geocentric latitude 
viscosity of air at float altitude 
density of air at float altitude 
torsional constant of kth element 

torsional coupling coefficient matrix 
azimuthal deflection angle, kth element 

angle of rotation about azimuth plane 

gust axis incidence, angle relative to horizontal 

rotation rate of earth 

angular velocity of kth element produced by gust 


SUBSCSIPTS 

1 initial value 

2 final value 

k system element (b, s,p or e) 

b balloon 

s load bar 

p parachute package 

e payload package 


POEMJLATIOW OP PROBMI 


The analysis will be carried out using a spherical polar 
coord ina te system and an idealized model of the balloon system 
as shown in Pigure 1. The origin of this coordinate system is 
taken to coincide with the geometric center of the balloon* The 


z-axis is taken as the local vertical and is positive downward. 
Similar systems are set up individually for the load har, para- 
chute package and gondola, each with the z-axis as the local 
vertical and the same positive sense as the "balloon z-axis, This 
system facilitates the definition of angular deflections for 
each element of the system, since, proceeding down from the 
"balloon, the total angular deflection of the system down to the 
element in question is additive with respect to the "balloon cen- 
ter, This also makes alge"braic work considera"bly more managea"ble. 

With regard to the system model, we make some "basic idealiza- 
tions. Since the moment of inertia of the "balloon alone is much 
greater than that of any of the other system elements, the balloon 
is assxmed to be a spherical shell with an extremely small thick- 
ness-to-radius ratio(ref .3) • Elastic deformation of this shape due 
to gust loading will be neglected. Secondly, we idealize the load 
bar, parachute package and gondola as right circular cylinders; 
these are not necessarily their actual shapes, but they will be 
defined as cylinders with moments of inertia equivalent to the 
actuial shape to simplify rigid body computations. Analysis in a 
IJulerian system was considered, but was deemed too difficult to 
attempt for the problem at hand; the Euler approach may, however, 
be more general and should be studied in the future. 

The equations of motion are developed in the lagrangian fona- 
alism, Since angular deflections due to gust loading are antici- 
pated to be no greater than 0.01 radians during flight (ref, 10), 
the small-angle approximation is invoked to simplify the mathe- 
matics somewhat. We will no consider bounce in this report; trans- 
lational motion of the balloon center of mass (CM) is included 
while assuming the balloon CM to remain at its initial equilib- 
riimi (float) altitude. Thus, we must deal with a system having 
eight degrees of freedom. The ^and ^ deflections and their corres- 
ponding angular velocities are found for each system element 
individually; obviously, moving down from the balloon toward the 
payload, the gross motion of the system becomes more complex due 
to the motions of the elements above the one under study. Pendu- 
lation (with and without damping), torsipnal (azimuthal) motion 
(with and without damping) and precessional motion will be con- 
sidered separately. In this manner, we will be able to examine 


the character of each tjrpe of motion alone; then, when we con- 
sider various comhinations of motion, we will have some means of 
judging the degree to which each type of motion contributes to 
the overall motion of the system* 

The Lagrangian EOM are derived in the standard form 



where, for the problem at hand, the generalized coordinates 
are the eight angles ® ^ -b» ^ 3» ^ ^p*^p>^e ^ e* 

generalized nonconservative forces take into account the aero- 
dynamic and viscous damping teims. We should note at this point 
that the EOM developed in the following sections are not carried 
to a closed form analytical solution. Solutions could be foimd in 
closed form in principle, but the algebraic work required to do so 
would be prohibitive. Hence, the EOM are developed to the point 
where they are easily integrable numerically. Terms due to sepa- 
rate motion types may be added together and then integrated as a 
whole to obtain the overall motion* 

After- the EOM are derived, we then address the problem of 
defining the gust loading model, since the gust velocilgr field 
configuration incident on the system will define the initial 
conditions for solution of the EOM* No attempt will be made in 
this report to define the stability criteria for system motions; 
this problem will be taken up in a future study* 


DE:7E10EMENT OE the equations OE motion 


Pendulatory Motion 

We first consider penduLition without the inclusion of damp- 
ing terms. The total kinetic and potential energies are 

vr — j 

2 = i ACVk ^k^^k ^ k^l , k = b,s,p and e (2) 

and ^ 

V - mggr^(l-cos0^)+a(l-CQS0g) + 

m^gr^(l-cos^^)+a(l-cos0g)+f(l-cos^jj) + 
m^gr-j^C 1-c 0 ) +a ( 1-c os^^ ) +f ( 1-c os^p ) +c ( 1-c os^^) 


( 3 ) 


!Tlhe linear velocities v^j, are first defined in a Cartesian coord- 
inate system "by their x,y,z components and then transformed to 
the spherical po3^r representation. In Cartesian coordinates 

(4) 
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( 6 ) 
(7) 


where i = x,y,z successively. Transformation to spherical polar 
coordinates is made throng the variables ^ For the 

balloon we have 


z = b 

The transformation relations for the load bar(^ ), parachute 
package(Y-) and- gondola(<T ) are of the same form as Eqmtion (8), 
with replaced by ajf-,c and the angle subscripts replaced by 
s,p,,e respectively. 

With T and Y; now aompletely specified, the EOM can be devel- 
oped from Equation (1). Tahing the appropriate derivatives and 
after considerable algebraic manipulation, we obtain eight, BOM 
corresponding to the eight degrees of f 2 ?eedom^^,^^., 

§ ^and^l^g^* We find that, these EOM are represented in the format; 
of a system of. ei^t simultaneous linear equations ^ i.e;. , 
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( 9 ) 


or in more compact matrix motatioja 

( 10 ) 

where; [X] isu tb,e (ijrnajniQ; csoupling; ecefficient. matrix containing 
the coefficients of all terms involving the second derivative 
with respect to time^and is the; static: coupling coefficient: 
matrix containing all other terms ( including damping terms). The 
elements of CaI and Lb] are given in the Appendix « 

It is clear that the pendulation EOM exhibit, rather strong dy— 
nsmia coupling for the entire balloon system; indicates the. 
presence of static coupling as well. This is not surprising, con- 
sidering the complexity of the problem. Eq.uationi (10) may be 
solved! for the desired solution matrlxX*^! "asing the; Gaussian 
elimination algoritbm( or method of detachedi coefficients^^) , and 
the resulting equations integrated directly to obtain Lqland tq]|. 
The; extremely high degree of dynamic and statie ©oupliiog, however, 
mahes direct analytic closed-form solution and integration pro- 
hibitively cumbersome as: far as algebraic work iss concerned. 

Torsional Motion. 


The torsional EOM derivation will be confined, to motion in the 
azimuth planer This is done to avoid using a Eulerian angle 
formalism, for the same reasons as mentioned before. This is not 
restrictive for our purposes; since we^^use a small-angle approx- 
imation, motion in the ^-direction will'^small compared to the mo- 
tion in the azimuth plane. When pendulation and torsion are con- 
sidered together, the torsional motion may be considered superim- 
posable onto the pendulatory motion. 

The kinetic and potential energies are written^’ ^ 

® * l/p * ij’S) 




( 11 ) 
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where" the torsiom constants are defined hy 


'^s = -“as 






Tq = -^g^f/(r^+a+f>i-e+h^+hp) 


( 12 ) 


The Lagr£ingia33i. EOE foi:' the: lAndamped case are 




* ' tA-V = ° 

Vs - V W * 7-p(<4-$^p) = 0 

( 13 ) 

Vp -' Tp(Vy ^ =° 

ijfe - rj.'?^-%) = 0 

In order to include viscous, and aerodynamia damping: effects, we 
define the' damping constant® jj. ^ 



t; g = 2.5(|»/i)*4lS't ' 

^p = 2-5(j’/<)M1^P 

5^ ^ = 2.5(jM)Mt^la * 


so that the EOM for the damped case are 
Igfs ~ * '^s^bi ~ p 

Vp = -■’p^p ■"■ tJ'b - ( V^J^p + rX 


( 14 ) 


( 15 ) 


The EOM for hoth the undamped and damped cases ^ow the exist- 
ence of only static coupling? h^ee the: system of equations in 
both eases may be integrated, directly® Note alsr that for each, 
case a system, cf ' only^ four EOM is obtained, in keeping ■with our 
consideration of motion in the; azimuth plane). 

In the digital computer program, the EOM are solved in the 
forms given by Equations ( 13 ) and ( 15 ) • Ajialy tie solutions to 
these EOM may be obtained by assuming solutions of the form 

,s,p,e* For nontrivial solutions, the EOM must 
satisfy the: condition 

=0 ( 16 ) 

i = 1 



where the are: constant- ooefficients of the the 3c ; this equa- 
tion is of ei^th degree in Ic and thus has eight roots • Since the 
£;.> 0 , there exist no real rootSJ^O^ jhut- real roots <0 may ex- 
ist* Complex roots are also admissible and wouldi occur in conju- 
gate pairs.- Since we require ^ ^“>0 as t--> °^,the real parts of 
complex roots must be; < 0. If we assxrae the existence of c.om- 
plex roots of the form lc=;p+iq and ^real negative roots u(u> 0 ), 

we may write the solutions as 

of ^ 

+ 'i' 1^) + (17) 

so that solutions can be; constructed once the are known, bu-fe 
the; algebraic work wouid become extremely c-umbersome. lEhat sinu- 
soidal solutions of this form do indeed exist is verified by the 
computer program results, which will be discussed later. 

Ini order to superimpose torsional motion upon the pendulatory 
motion, we must- define the analogous, forms of the matrices £aJ 
and {jbJ as defined in Equation (9)* We and 

B 0 will correspond to the right liand sides of the EOM; thus, the 
elements corresponding to torsional terms can be added to the 
pendulation Cb] by introducing a new eight-element torsional 
coupling coefficient matrix ^Tj^which is also a column matrix. 

Inclusion of Damping Effect® 


Damping forces are nonconservative in nature and are included 
in the Qj^ term of Equation (1). Ihe work of this section is appl- 
icable to both pendulatory and torsional motion. Ebllowing the 
lead of Germeles,et.al.^, we assume viscous damping on the ball- 
oon proper, and with spherical symmetry for the balloon, we have 

^ ^ ^ ^b; 

. ( 18 ) 

Aerodynamic damping is assumed, to affect, iaie other system ele- 
ment®, and. ia derived from the definition of the aerodynamia- 
drag; coefficient* Drag on supporting cables is neglected], since 



•the J3uxfaoe area of the cahlea is siaall compared to that of the 
other system elements^ Hence 


®P " ° * v^(x^+a+£) (19) 

Qs = i/Ag0^v§p^;fa*S1-ffi) = i Tjp^+a+S^-a) 


To he properly added to ‘ the matrix ([Bjl, Eg.Tiationa: ( 19 ) must he 

separated into their. & and ^ eomponents • Transforming the v, hy 
14 ^ 


the relations" 

•• ♦ 

% = ^dV®®3. 

* * • * 

- r^@-p,+a^_+f©„+cs^„ 
e^ h h s p e 

we then have 


= •■‘■pybV®?e% _ (20) 

’'■p). = ^AV®^aV^^p®p 

= ^l^Pl^>b+«‘f’s®3+^?pV^e®e 


and 


= */As°a(®b+^H»bV^a) 
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(21) 


*^S5^ ~ 


( 22 ) 


To properly introduce these terms into the [^bJ matris,we define 
a ctolumn. damping matrix {^d]] whose elements can he shown to he 



=Qpo VV^ 


% =%W^P 



®« =«3y®S3/“a?^®l 
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( 23 ) 


where the S> parameters are: given in. the Appendix. Thus, the 


inclusion of damping tearma can 136. accompliahedL by adding the 
damping matrix [dI to (KJ 

damped “ ^^tmdampedi "** 

Precessional Motiom 


Precessional motion in this paper is modeled after the stand- 
ard Poucault pendulum analysis found in many classical mechanics 

1 R IT 1 ft 

texts(e.g, , Marion ^jSymon pBecher ,or Goldstein"^ ) • In this 

framework, we consider motion for the case where ^y=0 and. a=0 
(which is consistent with our neglect of balloon bounce)* 

The Coriolis force -2m(a> x v ),when applied through a 

distance, r, produces an amount of work W = 2m‘ ’V •' (o5x which 
may also be written in tha I»evi-Givita density formalism as 


W. 


2m 





(25) 


We consider Equation (25) to be the total energy due to Coriolis 
force®, so that, in Cartesian coordinates, the Coriolis contribu- 
tion to the. Lagrangian is 

^oor = (26) 

Transforming to spherical coordinates and using the small-angle 
approximation yields the precessiojial 


§ K ^ ^ ^ b ^ sin A. 0 s Xl 

^b= -2Sb(?bVKb>=i“-^] 


+ ea(r^^+aSg^)coa>^] 

<$3= 2<m^+ma)afti3^ -2«a&^l^l»*'®Sa)‘f’al(r^b+®'«B)J®^'^ 



2("%+“s-Wp)f%(2C(r.^Si/aJa+iS‘p)-(ni^+a/<^+:^p)fj;]3inX 


( 29 ) 


'?p= 2(mTj+iV'^>f%i-29j,[(r^^+aSg+f^)yp+(Byi<,^+a;i(3+:^pOa±a X 


6 e= 2(m^+iBgfnj,+m^)ai!)^(2!;(r^?^+afg+f5p+ofg) 

-( = W W^«p-^®Ae J^eJ ^ 

s+^p+“V®°® 

^e= 2(mt,+mg+mp+m^oW^|^-2e^t(r^?^+aSg+ffp+o?g)y^ 
wliere for conTenienae. and brevity we use the abbreviations 


( 30 ) 


" ^k"^k^k^k 


^ k “ ^ k^k ^ k^k s»P> © 


As with the torsional EOM, the precessional EOM exhibit only stat- 
coupling and may be integrated directly, They are added to the 
pendulation EOM in a fashion similar to that done in the tors- 
ional easel likewise, an analytic solution is possible but pro- 
hibitively cumbersome. Precessional motion is not expected to af- 
fect the motion of the system significantly? this will be discus- 
sed later. 


GUSOl LOADING MODELING 

The gust loading model may properly be considered to be the 
most important aspect of the problem, since the character of the 
gust field will determine the initial conditions(lC) for solu- 
tion of the EOM, We- will try to define the IC in terms of the 
gust velocity profile, incident on the system. Statistical var- 
iation in the gust field or gust effects on supporting cables 
will be neglected, since they are not eapected to be significant 
in a small-angle deflection analysis. 

Gust loading is expected to occur suddenly and to last for a 
specified finite; time, interval before being "'turned off". If 
this time interval is small compared to tha time interval in 
which the system is in motion after being loaded, the gust model 
may ba developed as an impulsive motion problem. Denote the 
time of onset of the gust by t^_ and itaii "turn-off" tima by tg* 
The linear impulse is defined by 


= m(vr2~v^) = / ^ E di;- 
J 1*T 


( 31 ) 


and tile applied torq.ua lay 35> = Ii ^ Hence the- impulsiva tor- 

q.ue J is 


J = 


Hi at= xio>2-ot^) = iA<a 


(32) 


If the primary linear impulae ia applied such that its line 
of action is at distance from the CM of the element in (Quest- 
ion, then N=P\r and hence 



dt: 




(33) 


Equating, (32) and (33), the. angular velocity change produced "by a 
linear impulse acting at distance T from the CM is /\o> = /l • 
If a number n of different impulses are applied simultane^ 
ous3y at different, distances , then, noting that the P^^^ and 
hence also Ad), are now functions of OT ^ as well as of time, we 
have in general 


n. 


AdJ ( ^(Ti^^i^^i 


(34) 


which gives the differential change in angular velocity pro- 
duced during, the. time, interval in which the gust acts. We are 
primarily interested in motion during a specified time interval 
after the gust loading has occurred* Since, damping forces will 
influence the motion of the system after gust loadings then we 
may expect 4d)to be diminished by some function of time(perhaps 
an exponential decay type behavior) f(t) for -fc^O due to damp- 
ing. The actual temporal-spatial inter-relationships are not) 
clear at this time and will require further stu(3y, Ihus,fbr t)>:t 2 
we modify Equation (34) to read 

n 

^ 21 fi(t.) (35) 


A fit; ( - 


i=l 


We also nota that translational motion may also suffer the effect 
of damping. 


spatial Characiier of' Gust Field 


Deferring for tlie present t2ie question of the temporal factor, 
let us consider the effects of the spatial character of the gust 
field upon the system. Since we hawe assumed spherical symmetry 
for the balloon and cylindrical symmetry for the other system 
elements, on velocity field profiles that are asymmetric with 
respect to the element CM will yield a net rotational motion 
on that element, !Bhe; geometry of the problem for the- balloon is 
shown in Fig, 2 for a profile whose peak is offset from the CM, 
and similar geometries exist for the other system elements. 

For the moment, confina the analysis to a planar velocity pro- 
file parallel to the azimuth plane. Then 
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n 




^k 


f(t.) 


whereik = b,s,p or e. Substituting (36) into (40), 

=-^ E C^-sp 


(36) 

(37) 


f(t) (38) 


Writing out the first few terms of (38) will show that, up on add- 
ing up all terms, we have 

— § (n-i+1) 5j^[Tr(5p-T(§-i_p]f'(t) 

Ij- X— 1 

(39) 

By Fig.2,yQ is located at the CM(also the geometric center), so 
that no net rotational impulse is produced at that point; only 
translational motion could be produced at Thus, in all cases, 
so that (39) becomes) 
n 

w cs-)=3 E (n-i+l)S J-vKyp-vCXxO] S{fc) (40) 

^ ^ i=l ^ ^ IX; 

Equation (40) thus gives the total accumulated 6) out; to distance. 
S = '^^t "fant due to the symmetry of the system, this is only half 


of the total it> which must also include the contiri'butiona from 
=0 to ^ Hence we must siua over 2n points and (40) now 

reads 

2n 

5!-i:=Wk(±^n) =r •§ 

X-I^ X— -L 

(41) 

This expression provides the IC for the problem by defining the 
net angular velocity change in terms of incident gust velocity 
profile e 


T^ro- and Three-Dimensional Gust Configurations 


The analysis above assumed a planar velocity profile parallel 
to the azimuth plane. We might also consider planar profiles ro- 
tated about the azimuth plane, three-dimensional profiles normal 
to the z-axis^or more generally, plaiaar and three-dimensional 
profiles incident on the system at angles off the horizontal(e,g,, 
a gust coming up from below at some specified angle). Consider 
each case separately, assuming the system at rest- prior to load. 

We first- study a planar profile rotated about the azimuth 
plane by an angled , Assume the characteristic length of the 
element to be h, and- the point of intersection of the profile at 

^ SI 

o =0 and the system element occurrii^ at distance from the CM 
along the body axis. In keeping with the coordinate system defi- 

* 40 

nition, h^ > 0 below the CfM, At. angle , the body will see a i 
different from what it saw in the azimuth plane, i.e,, 

= TseejC^; (42) 

This equation, however, becomes singu2.ar as'X-^ +1T/2, But we are 
concerned only with the effect of the gust over h^j.. Denote 
by r . and < 0 by^^ . Then from Fig.BjWe find that as p< + 'TT/2 
the body effectively seea 


•S; 




(43) 


Equations (42) and (43) provide further generalization of (41)» 


as we can now specify^ for any planar profile rotated aliout the 
azinrutli plane, olDserving the restrictions of Equation (43)fthe) 
cases X “0 and X = included in this generality due to (42)* 
Wow extend the analysis^ to a three-dimensional profile normal 
to the z-axis(Eig*4) «• Such a profile may consist of a series of 
identical parallel planar- profiles^ "staclced" one upon another a nd 
either parallel to or rotated about the azimuth plane, or a pro- 
file whose volume shape is that of a body of revolution* She ge- 
ometry for a planar stacked profile ia that shown in Eig*4, and 
is an extension of the profile, shape iised in the derivation of 
Equation ( 41) • Eor the stacked profile, rotated about the azimuth 
plane (Eig.5),we assume that there exist a munber nt of planar pro- 
files parallel to each other rotated about the azimuth plane at 
angle OC . Eor each planar the profile, the element will see a dif- 
ferent i ^ and hence will experience a different net angular ve- 
locity change ^ ^ . The total Q- produced on each element is 
then 


a 


fin 


m 


E 

d“2. 


observing the restrictions of (43), 



(44) 


and with (42) modified to 




(45) 


Eor the ease of a profile, whose shape is that of a body of revo- 
lution, regard the profile as a number q of planar parallel stack- 
ed!, prof iles^ each parallel to the azimuth plane(Eig.6) * It is 
clear that the ^atial character of each such profile is depend- 
ent on the distanee z from the spherical coordinate system ori- 
gin, i.e,, we have v(’S ^ v(.S' j^,s) • The. effective velocity 
profile' then becomes 

a 

v..(!^^,.z) = -i- 2 Vj(S’.,2i) (46) 

q i=l 

so that. Equation (41) shouldi now read 
2n 

S (n-i+1) ^^^v(S ^,z)-v(S ^^ 3 _,z)'^f(t) 

^k 


(47) 


In general, i;i is possi'bla for any gust- to approaoli ijlie 'balloon 
system at soma angle ^ relative to tlie liorizontal(J‘ig,6)# For a 
given gust configuration, tlie variable under study( denoted ar'bi- 
trarily here by A) will Iiave a horizontal component Aeon ^ , and 
a vertical component Asin ^ • Those components must be taken into 
account, and defined before proc eliding with a given computation. 
For this study, we would be interested in the horizontal compo- 
nent. 

We have said nothing about the definition of the velocity pro- 
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file itself. For the LACATE mission, Davis indicates that a 
gust may load the system for a time interval of 6 seconds and 
have a peak velocity of 4.0 knots. The time history of this load 
would be a step function, and the spatial shape is expected to be 

p 

a (1 - cos t) type waveform spread over a distance of about 300 
meters. Thus.^ we would define oux velocity profile 




[l - cos^ ^i”“^ - X ) 

, r<o 




(48) 

^peak 

[l - ens^ 

, r> 0 

Where V 

is the distance ^ at which the peak of 

the profile oc- 


curs and X is the profile quarter-wavelength. 

Indeed, other balloon missions may use other velocity profiles. 
They may also anticipate gust field configurations other than 
those discussed in this paper, but most of them will probably be 
reducible to one of the cases discussed here. As more knowledge 
of the nature of gust fields that occur in reality is gained, it 
will be possible to make this gust loading model more general and 
better able to describe the gust as it occurs in nature. 

CONCLUSIONS 


We will deal with no lengthy conclusions in this report, as it 
is felt that such concluBions should be backed up with more in-depth 
study, particularly with respect to the stability criteria for the 
system. Therefore, we will defer such discussion until the follow-up 
study on the stability criteria has been completed. Here, we will 


make oMy passing mention of certain observations that may be made 
from the study and computer program results. 

The motion of the system is extremely complex, as we mi^t intu- 
itively expect. This is definitely boime out by a number of test 
cases run on the computer prog 2 ?am. A.s we noted in the analysis 
section of this report, strong static and dynamic coupling between 
the various elements of the system is evidenced by the computer 
program. We also find that the contributions due to the Coriolis 
effect are very small indeed, as we would expect. Damping effects 
appear to be negligible for approximately the first three minutes 
in any given test case; after this time, these effects gradually 
begin to be more significant, although they do not appear to become 
an overriding or even major factor in the overall system motion. 
However, when we consider torsional motion alone, the damping effects 
do appear to become a significant part of the motion after a few 
minutes. 

The most significant type of motion appears to be the pendula- 
tory motion. The magnitude of this motion varies from component to 
component of the balloon system. The balloon exhibits, in a typically 
convergent set of solutions, the most pronoimced degree of pendulatior 
This would be expected from our current model, since we have assumed 
that the gust is applied spatially only over the dimensions of the 
balloon; subsequent motion of the other system components is assumed 
to be induced by the motion of the balloon. We find that the balloon 
may take rather large excursions in both the 0 and ^ directions; 
in the same test case, the load bar made major excursions only in 
the ^ direction, althou^ to a lesser degree than did the para- 
chute package. The payload made only small excursions in the & di- 
rection; this fact is fiorther backed up by preliminary data from 
the actual LACATE flight, which indicated very little motion in the 
payload package. 

It may also be noted that for the case of simple damped pendula- 

toiy motion in a plane, the analytical results obtained in this study 

10 

reduce to those obtained by Hinton • 

Although we have been remiss in making any really concrete con- 
clusions in this report, we feel that more accurate and meaningful 
conclusions can be drawn after further study into the stability 
question, and after LAOATE fli^t data are available to verify the 
correctness of the model proposed here. 

1 v v. .1 - : , ■■■■■ ■■■■■■ 


COMPUTER PRO&EAM STRUCTURE ARD USAGE 


Program IiACATE consists of the driver program LACATE and 
attendant subroutines GUST, UIPSUB, PEDERV, MATIITV, DIEEUH, PEKD, 
TORS, COEIi, DAMP, BOSS and PLOTS, The basic program structure is 
shown in Figure 7 , The program has been modularized by function 
to facilitate its use so that oniy those modules that are desired 
for a particular run are executed. The gust model module, which 
provides the@^ and initial conditions, eonstitutes subroutine 
GUST. Subroutine DIPSUB is the main integrating module, and has 
subroutine DIFFUN as an externally defined argument, DiFFUN is used 
to define the derivatives of the eq.uations of motion to be inte- 
grated, It contains logic used to call up the pendulation module 
PEND, the torsion module TORS, and/or the Coriolis module CORL 
as desired. The module PEND also has a logical flag that may be 
set to call the damping module DAMP if desired. A short discussion 
of each module follows; for more detailed information, the user 
should consult the program listing documentation. 

Under the current program configuration, motion of the balloon 
simulated . over a 30 second time interval requires approximately 
60 seconds of CPU time to compile and execute; it requires 45Kg 
locations of core and expends 400 o/S calls, and is designed for 
use on the CDC 6600, 

LACATE 

This is the mainline program which reads all NAMELIST inputs, 
calls the gust module to set up initial conditions, sets up the 
inputs for DIFSUB, and makes the call to DIPSUB, which integrates 
the equations of motion. This routine also controls all printed, 
punched and plotted output functions. 

GUST 

This subroutine computes the initial conditions for the angu- 
lar velocities of the balloon. It requires as inputs the following 
variables read from cards: 

ALPHA - the quarter wavelength of the sinusoidally 
shaped gust velocity profile. 

NU - the distance ^ at which the peak of the gust 
velocity profile occixrs. 

NEB - number of ^ points to be used. 


It provides as output tlie values TDOTB and DOTB, which, are the 

* * 

initial conditions on and , respectively. 

DCTSUB 

This subroutine integrates the system of first order differen- 
tial eq.uations of motion. In our case, we have a ’’system of systems” 
of ordinary differential equations. It requires as inputs the data 
in NAMELIST /DIP3/ • The eqiiations to he integrated are defined 
and set up in DIEEUN. 

DIEEUN 

Subroutine DIEFUN computes the scaled derivatives and sets up 
the equations of motion to be integrated by DIFSUB. By setting the 
logical flags appropriately, the user may choose any desired com- 
bination of the modules PEND, TOES and OOEL. After this has been done, 
the total contribution from each module is added up to give a 
cumulative total due to the combinations before retvirning to DIESTJB 
for integration. If a module is not used, its contribution is 
automatically preset to zero. 

PEED 

Subroutine PEND sets up the pendulatory equations of motion. 

The damping module DAMP may be called, if desired, to add in the 
contributions of viscous and aerodynamic damping. 

TORS 

This subroutine sets up the equations of motion for plane 
torsional motion. This module already contains its own damping 
terms. 

CORL 

Subroutine CORL sets up the equations of motion for inclusion 
of the Coriolis effect on the motion of the system. 

DAMP 

Subroutine DAMP computes the viscous and aerodynamic damping 
tenas to be added into the pendulhtion module. The damping terms 
are passed back to PEND via the D(I) array and added to the B(I) 
array in PEND, 


BOSS 


Subroutine BOSS is a SITOBOL 4.0 generated routine wliicli solves 
a system of linear equations represented by the matrix equation 
MCy =[b]. boss is utilized only by subroutine PEUI) to solve the 
system of eight linear equations of motion. The algorithm employed 
is the method of detached coefficients, alternatively called the 
method of Gaussian elimination. 

PLOTS 

This routine calls up the Calcomp plotting routines TPPLOT 
and AVPLOT. 


Sample inputs, outputs and a program listing are given in 
Appendix B. 


PLOTTING ROUTINES FOR LACATE 


Two post-processor plotting routines have been written to 
provide plots for program LACATE, These are programs TPBLOT and 
AYPLOT. 

PROGRAM TPPLOT 

This program uses the punched output of the angles 0 and ‘f 
for each component of the balloon system from program LACATE to 
provide a plot of THETA versus PHI. A point is plotted after each 
pass through BIPSUB, so the user may observe the spatial motion 
of each component as seen from above that component. All four plots 
(balloon, load bar, parachute package and payload) are plotted 
together, with the same scaling factors, to provide a comparative 
view of the magnitude of each component's motion relative to the 
other components. 

The program is written for the Calcomp plotter, and requires 
as inputs the punched output. of the angles from BIE50B. The num- 
ber of passes throu^ DIPSUB, and hence the number of puhched 


cards, is denoted by the variable KB, which, is set by the user* 

The scal.ing may also be reset by the user by changing the adjust- 
ed minimum MIN and scale factor ASCP as dictated b^ the range of 
data being dealt withj this will allow the user to use as much space 
on the plotting paper as possible in order to obtain the best 
detail. 

The program may be run successfully in 50 seconds, 50Kg core 
and 700 O/S calls; Ko. 301 Red plotting paper is recommended. 

PRO&M AVPIOT 

Program AVPIOT is a Calcomp routine intended to provide plots 
of the solutions of the equations of motion as a function of time. 

It requires as inputs the punched card output from LAC ATE for the 
angular velocities as well as the angles. At this writing, however, 
AVPLOT has not been completely debugged and tested, and thus further . 
discussion of it will be deferred until future updates on MCATE. 


CONCLUDING REMARKS 


The author wishes to express gratitude to Dr. M.J, 
Queijo, Mr. D.E. Hinton, and Mr. R.E, Datris of NASA Langley Re- 
search Center and Ms, M.L. Adair of LTV Aerospace Corporation for 
their valuable assistance and consultation in various phases of 
this study. 
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AEPEKDIZ A 


EIiEMENa;S OP THE DYHJiMIC AMD STATIC CODPLIHG 
COEPPICIENT MATRICES; 

Por brevity in writing out the terms of the \^ a \ and jjB^ mat- 
rices, we first introduce the following expressions: 


Sb = { VVb 

+ 1)"^. 

®bb “ t^l/“ 4 ^b®b 

+ 1)~^ 

S3 = {Ig/m3a2 

+ 1)"*^ 

®ss = 

+ 1)*“^ 

Sp = (Vv^ 

+ l)”^ 

Spp = <VV®p 

+ 1)“^ 

S3 = (IgAxC^ 

+ 1)“^ 

Sgg = (Ie/”>x»®l 

+ 1)”^ 


The eleF.ents of the dynamic coupling coefficiemt matrix are 
then written 

Ai 3 = m3aS^m^r^ 

A 35 = 

^16 = ” 2 ^ 

Ax7 = 

^18 “ 

A 23 = A 24 = 

■^25 “ ■*’26 “ ™2^^p®bl/“4^'b®l3 

A27 = A28 = “x°^e®bl/Vb®b 

A 3 X = r^Sg/a 
A ^5 - mgfSg/m^a 


^36 = 

■*■37 ” »x°®s/“3®' 

^38 = 

■^41 “ ~ ^42 

''45 = ^46 = V«PpSss/“3^®b 
^47 = ^48 = V‘f’e®s/“3®®B 
■'^51 “ 

■*■52 “ ^b®b^‘fp“‘fb^®p/^ 

•^53 " ^®p/^ 

^54 = ^®s(Vp-‘«’s) V* 

A57 = m^^cSp/iOgf 

Hi "" H2 ^ ^-b^-b^pp/^S 
^63 " Ha" sSp/^^P 

Hi ^ Hs ^ 

Hi " Ve/° 

H2 ~ ^•b^‘b^^e*'^^^e/° 

^73 

Ha = 

A75 = fSg/c 

•^81 “ ^82 " ^'faP'b^ee/*^ ^ e 


hi = ^84 = «e 

■*■85 “ '*'86 ” ^%®ee/° ® e 

and the elements of the column static coupling coefficient matrix 
Cb 3 are written 

- vC2Vp'V?p)-^p^p-^»p(V®p>3/V6 

- “l°[2Seie(Vfe’-^^e^e(V®e)y“4M 

h = Stt^-2(m3aSgifg+m2f5p«fp+m^oe^f^)/m4r^ei, - 

^3 = S3[92e^_<_r^i^2a^,tge3)/a 

- "2^1 -^p V^p'®s-®pO /»3^ 

=4 = S33(-2(m3r^9^VV®p^p+“l'=^e^e)/“3^®s ' 

- ^[-fs%-*^s(V'*s)+2S34'3(‘f>p-f3)yf 
-^ mi'-^eSeAgf + S^p/f r 

®6 = Spp\-2t“2(y'ir'b'^a'eA)+“l“®e^3/“2% - 2SpV®pl 

- a[-€e3•^©^(S -e3)H-2e3^3('p3-if-)]A 


- f^SS-n/o + gSVcf 


'P P 


-3 


and 


^8 = S^el-St^AV^^s+fSpVp’/^^e 




} 


appendix b 


SAMPIiE INPaiS AND OUTPUTS AND LISTING 
OP PROGRAM LACATE 


This appendix provides data inputs and output for a typical 30 
second 2 ?un, as well as a’ complete listing of the LACATE program* 


Inputs 

All inputs are made through the use of NAMELIST statements set 
up according to their functional use. The following tables describe 
these inputs in more detail; unless a value is otherwise specified, 
a particular variable is to be set by the user. All inputs are made 
in the MKS system of units. 


NAimiST 

VAEIABLES/CONSTANTS 

EUNCTION 

ANGL 

THSTAB , THETAS , THETAP , 
THETAE, PHIB, PHI S , PHIP , 
PHIE , TOOTS , TDOTP , TIX., TE , 
DOTS , DOTP , DOTE , OMEGA , 
LAMDA 

Inputs initial con- 
ditions on angles, ang- 
ular velocities and 
Coriolis constants 

CONS 

MB,MS,MP,ME,RB,A1,L,P, 

RS , RP, RE, G,RH0,MU, N, HS , HP, HE 

Inputs constants used 
in program 

TEST 

IPEND, ITORS , ICORL, 
IPLOTS , IDAMP 

Inputs logical flags 
for module selection 

DIPl 

H, JSTART,HMIN,HMAX, EPS , 
MTH , MAXDER, TO , TE , PV 

Initialization con- 
stants for DIPSUB 

DRAG 

ASOS,APCP,AECE 

Constants used in 
aerodynamic damping 
c omputations 


PRECEDING PAGE BLANK NOT HEM! 



OutpU-faB 

Program LACATE provides TDoth printed and pimciied output* Printer 
output consists of th.e THETA and PHI angles and tlieir corresponding 
angular velocities for each component of the system, i«e*, the 
solutions of the eqUt?.tions of motion. These values are printed after 
each successful pass through DIPSDB at intervals of time determined 
by the step size chosen by DIPSITB. Printed output is also punched 
on cards to be used as inputs to the two post-processor plotting 
routines. Output from a typical test case follow. For each time 
indicated, the top line gives the values of the angles, while direct- 
ly below each angle value is given its corresponding angular veloc- 
ity at that time. The case shown was run for TP » 30.0 seconds. 

At the end of this time, PIFSDB was still providing convergent 
solutions and a normal termination occurs. In the case of a non- 
convergent solution, output would continue as in the convergent 
case, but when the minimum step size specified by DIPSUB is reached, 
program execution is halted and an error code and working storage 
array are dumped for diagnostic purposes. The angles have units 
of radians, and the angular velocities are given in radians/sec. 

Also shown are representative gust model computations for the 
velocity profile (A) of Eq.uation (48) in the text. Referring to 
Figure , we interpret this data as follows; 

I - the value of ,i.e.,the distance outward from 

the center of the balloon, 

AA(I) - the velocity at station I for ^<-0, 

BB(I) - the velocity at station I for ^>0, 

V(J) - the velocity at station I considering bothS’<^0 

and 5 S 0, i.e,, V(l)=AA(I)+BB(l) . These values 
of V are used to compute the rotational impulse 
at station I due to V( I ) . 

The computation of the net rotational impulse produced by the 
gust at each station I, i.e., the computation of SL $ is also shown. 
Rote that as one proceeds from 1=1 to 1=150, the net impulse is 
accumulating. In other words, WXi) is the net change in angular 
velocity that has been produced by all velocity components from 
1=1 to I=I ( current) , Thus the final value mf W(l) (here, W(150)) 
is the net change iru .angular velocity over the entire balloon, and 
it is this value that is taken as the initial condition(s) for © ^ 
and/ or if . 


PAEAMEIDEE 


VALUE 


DESCEIPTIOE 


fHELAB 


radians 

■balloon theta deflection 

0?HE1’AS 


radians 

load har theta deflection 

THETAP 


radians 

parachute package theta 
deflection 

THETAE 


radians 

payload theta deflection 

PHIB 


2?adians 

balloon phi deflection 

PHIS 


radians 

load bar phi deflection 

PHIP 


radians 

parachute phi deflection 

PHIE 


radians 

payload phi deflection 

TBOIS 


rad/s eo 

load bar angular velocity in 
theta direction 

TDOIP 


rad/ sec 

parachute package angular 
velocity, theta direction 

TDOTE 


rad/sec 

payload angular velocity, 
theta direction 

DOTS 


rad/ sec 

load bar angular velocity, 
phi direction 

DOTP 


rad/sec 

parachute package angular 
velocity, phi direction 

BOIE 


rad/ sec 

payload angular velocity, 
phi direction 

OlEG-A 


7.27 X 10“^rad 
sec 

rotational velocity of the 
earth; used only in GOEL 

lAMDA 


• 5.7305 X 10"*^rad 

geometric latitude at Holloman 
Air Porce Base, Hew Mexico; used 
only in GOEL 

MB 


861.82 kg. 

mass of balloon 

MS 


112.94 kg. 

mass of load bar 

IP 


37.194 kg. 

mass of parachute package 

ME 


214.095 kg. 

mass of payload package 

M 

Ml 

Ml 

Ml 

Ml 

:i)=214.095 kg. 

2) ^251.29 

3) =364.23 

U)=1226.06 

An array dimensioned M(4) such 
that: 

M( 1}=ME 
M(2)-ME+MP 
M(3)=pi+MP+MS 
M ( 4 ) =ME+MP+MS+MB 


SB 

64. GO 

meters 

balloon radius 

A1 

23.16 

meters 

length of cable between balloon 
attachment point and load bar 

L 

396.24 

meters 

length of cable between load 
bar and parachute package 

P 

3.3527 

meters 

length of cable between parachute 
package and payload package 


PARAMETER 


VALUE 


LESCRIPTIOH 


ES 

0,6096 meters 

EP 

0,4572 meters 

EE 

0,92t44 meters 

& 

9*656 m/sec 

EHO 

1,027x10"^^ 

MU 

1.695xl0"^kg 

m«sec 

IT 



HS 

0.6096 

meters 

HP 

H 

• 

o 

meters 

HE 

1.8288 

meters 

IPEIUD 



ITORS 

ICOEL 

IPLOT 

imBtp 



H,JSTART,HMIH, 

MTH,MAXDEE,TO, 

H&IAX,EPS, 

TPjPV 


ASGS 

1,03085 

m2 

APCP 

1,03085 

•S? 

AECE 

1.50503 

TI? 


radius of load "bar cylinder 

radius of pa2*aciLute cylinder 

radius of payload cylinder 

acceleration due to gravity at an 
altitude of '30 10E;resetta'ble 

density of air at 50 km altitude; 
user resettaUle 

viscosity of air at 50 km 
altitude ; user resettable 

number of differential equations 
to be solved 
=4 for TOES 
=8 for PEND and COEL 

length of load bar 

length of parachute package 

length of payload package 

pendulation module flag 
=0, modtile not used 
=1, module is used 

torsion module flag 

Coriolis modiile flag 

plotting module flag 

damping module flag 

refer to subroutine DIPSTJB 

product of load bar surface 
area and drag coefficient 

same for oarachute package 

same for payload package 


tANtiL 


. THtTAB = 

THETAP = 
THEIAE > = 

™PHIS « 

mpHip ... ?= 

^^PHIE .- 

^SZimis 
~ fnofp^” ^ 
-1 Ztom£IZ^. 
J7!D0tS.™ = 

_OQXP 

-^wJDQTi: _^- 

,4aAH0A^^ 


O.lE-05. 

0*IE^CX5^^ 

U^IE-054 ..... 
0.1E^Q5m». ... 

0.l£-Q!L.l- 

Q.1E-Q5- 

a* IE-05,. — 


D.0< 

0^0, 

0*0^. 

0,Q«. 

0*0. 



□ ,727Er-04^-,— 
O-STSDSEi-QO* 


f- 

i 


’ SGQNS - , - 

MB . = 0.B61825S6%t^03« 

. - s a. 1129445Q26£f 03 » 
rjHE~_~y= 0.371945768E*-02« 


.. HE.^ = 0.2140956l2flE<-03. 

. .H 


C-214Q956l.2BEl^03. . .D-2S12901896£*-03 . D-3642346972E *^03. 

0. 12260602 S72E 4-04* 


__BB 

-_AI 


0.64E402* 
0.2316477BE4-02, 
0. 39623B7E4-03* . 


R -T- 0. 3352 7B9E 4-01. 


RS . = J.6096Et0a* 


.RP 


. RE_ 


0,4572E+00. 

a.9144E4-00*. 


G = 0-96560B4E4-01. 


.„.RriO-_'__ = 0.1027665726E-02*- 

HUr_~3Tl* 0. 169496074B55E-04. . 

Ha 


.N » 


...HR. s 0.6 096F+00* 

...HR » 0.9144E*C0» 

HE c 3. ia?auEi-oi. 

tFNfj 






STFST 
I PEND 
^roRS 
ICORL 
T PLoT 
I DAMP. 


. £FND 


... £f)lFl - . , 

. H. = 0.126E-06. f 
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^7.79143E-Q4 
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: ANGLE--- 

■; _ RATES . 

3.132'iQa 

-7.32287E-04 

-1.93257E-04 
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-2-5982tJE-04 

-l.D02a2E-04 

-4.69329fc-05 
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3.2J2500 
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-d.3U09E-04 

-2.5‘JB2dE-04 

-1. 048476- J4 
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3.3 )2500" 
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„ . ANGLE 

3.432500- . 
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-Q.830 746-04 

-1. l315iE-04 

.R.ATES 
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-3*85U33E-05 

ANGLE 
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3.502 500 

.■.8.064 03E-04 
.-1.7 7136E-04 

-9.09057E-04 

-2.59B27E-04 

-!• 163486-04 
-3.53726E-05 
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= Z^ANGLE.ir 
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_ angle -- 
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I:! ANGLE..... 
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T-1.11692E-03 

-2.59826E-04 
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4.402500 

-9.4 /761E-04 
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-1.30iavr-04 
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thetae ‘ 
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-9.01424E-06 

-2.744d3E-0b 

-3.07665E-06 
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9.96692E-07 

-1.09752E-07 

3.46524E-06 

3.27BB4E-06 

-4.12453E-05 

-7.21717E-06 

-9.25506E-0b 

-2.07060E-OC* 

-3.744B5E-06 

-7.03532E-0£) 

9.96592E-07 

-9.05973E-IQ 

3.63633E-06 

3*5407lE-06 

-4,Ba278E-06 

-7-945BIE-06 

-9.-42393E-06 

-1.30765E-06 

-4.4B566E-06 

-7-7785IE-Q6 

9.96512E-Q7 
-6.86254E-1 J 

4.17331E-06 
3. 800466-06 

-5.715h3C-06 

-8.70476E-06 

-9.3i211t-0b 

-4.58657E-07 

-5.30240E-06 

-a.55355E-06 

9.96456E-0? 

-4.38957E-10 

4.566t4E-06 

4.C5570E-06 

-6.62537E-05 

-9.49147E-06 

-9.5U23E-06 

4.7142BE-07 

-6.19810E-06 

-9.35736E-06 

•9.96426E-Qt 

-l.65390E-ie 

4.98454Q-06 
4. .304036-06 

-7.61524L-06 

-1.03C32E-05 

-9.41353E-J6 

l.475UE-Ct> 

-7.17547E-06 

-1.018d7£-05 

9.96424E-07 

1.32331E-10 

5.42702E-06 

4.543I2E-06 

-8.6H 739E-C6 
-1.1136BE-05 

-9*212l5b-06 

2.54219E-06 

-8.2 J68aE“06 
-1.10382E-05 

9.96453E-07J 

4.51l86E-ia 

5.89202E-06 

4.77062E-06 

-9.B4385E-06 
-1. 198936-05 

-8.9O141E-06 

3.63929E-06^ 

-9.38439E-06 

-1.19C86E-05 

9.96515E-0r 
7.8i ^71E-L0 

6.3»3o8£-06 

4.95433L'»06 

-1.L0864E-05 

-1.28574E-05 

-a.477l2E-06 

4.80989E-06 

-1.06197E-05 

-l.27943t-05 

9.96612E-07 

1.13523E-0-? 

6.839UF-06 

5*ia217E-06 

-1.24163E-05 

-U37378L-05 

-7.93693E-06 

5.9T412E-06 

-U194426-05 

-1.36922E-Q5 

9.96743E-07 

1.48923E-09 

7. 416436-06 
5.362246-06 

-U38347E-05 

-1.46270E-G5 

-7.28062E-06 

7.12873E-06 

-1.33589E-05 

-1.45987E-05 

9.96910E-07 

1.84190E-09 

7.96077E-06 

5.52284E-06 

-1.53423E-05 

-1.55217E-05 

-6.51050E-06 

a.247i3E-06 

-1.48645E-05 

-1.55107E-05 

9.97112E-07 

2.l8491b-09 

8.5201QE-06 

5.6624BE-06 

-1.69395E-05 

-1.64186E-05 

-5.63168E-06 

9.29965E-06 

-1.64615E-05 
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9.97347E-07 
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-4.65238E-06 
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TIME 


THE TAB 


PH IB 


THETAS 


, ANGLE 

a. 102500 . 

, -il. 101546-03 

-L. 584606-03 

-1. 424266-04 

__ RATES . 

■ 

-A.2Ao7BE-05 

-2.5‘5a23E-D4 

-l. 8/970 E-05 

— angle . 

6. 202500 . 

-1.10549E-03 

-1.61058E-03 

-l,4A46rE-0A 

. - RATES . 


. -3.66133E-05 

-.a.5rJ8 4e3E-0A 

-2.196946-05 

. ANGLE- - 

a.iOZ'iQQ 

-1*108866-33 

-l.t> '36576-03 

-1.4o8276-J4 

_ RATES . 


-3.07500fc-05 

-2-59B23E-04 

-2.516906-35 

ANGLE 

fa.4O2S00 

-I.IU6AE-03 

-l.otj255E-03 

-1.49505E-04 

^ RATES - 

— 

_ -2.488326-05 

-2.5yB22E-0A 

-2.83431E-05 

ZIangle 

6.5Q2500~ 

-i*ll383E-03 

-1.6adS3E-03 

-1.524976-04 

_ rates: 

— 

.._-l*90i 866-05 

“2. 598226-04 

-3.14394E-05 

ANGLE 

b.A0?50Q— . 

__ -1. 11544F-03 

-K714516-03 

-U55792E-04 

. . -RArES 


-1.3l6l6e-05 

-2.59a22E-0A 

— 3* 440 66 £-05 

ANGLE 

6.702500 

. -l,li6A7E-03 

-1*740496-03 

-1.59374E-04 

-RAIfS 

— 

— -T.3irS9E-06 

-2.59a22E-04 

-3.719566-05 

--.angle 

6.80? SOO - 

-I. 116916-03 

-1.T664BE-03 

-1.63^246-04 

_ . RAXES.— 


.. . -1*491766-06 

-2.598226-04 

-3.975986-05 

ANGLE— 

6.902500 _ 

ZZl*11677E-03 

-1.792466-03 

-1.673176-04 

RATES.— 

— 

4.310756-06 

-2.598226-04 

-4.205£>2E-05 

angle 

7.002 500 

-.-I. 116056-03 

-1.818446-03 

-1.716246-04 

RATES-^ 


1*008506-05 

-2.59B22E-04 

-4.404!j76-05 

_ . ANGLE . _ 

7.1025QQ - 

Z- 1.114 75 E-03 

-1.844426-03 

-1. 701136-04 

-RATES 

.... — 

__ 1.58263E-05 

-2.59822E-04 

-4.569426-05 

ANGLE-. 

7-202500 - 

.. -1.11288 6-03 

-1.870416-03 

-i.a07'*86-04 

... RATES . 

— 

.. .2.153016-05 

-2.598226-04 

-4.69726E-05 

Z ANGLE , 

7.J02500 . 

-1.110456-03 

-1.896396-03 

-1.854916-04 

RATES.., 


. 2.719226-05 

-2*593226-04 

-4* 785786-05 

angle 

7.4D250Q 

-1*107456-03 

-1*922376-03 

-U90J01E-04 

PATES 


3*2 ilOOcj 6-05 

-2.59822L-04 

-4.833246-05 

ANGL6 

7.5Q2500 

-1-1 03896-03 

-l*94a356-03 

-1.951376-04 

R4TES 


3.837556-05 

-2.598226-04 

-4.8iaS5t-05 

ANGLE 

/.? 

-t -0 ^9 /7F-03 

-1.974 J1E-03 

- 1.9 49^8 r - J4 


I » 



PHIS 


THETAP 


PKIP 


THETAE 


PHIE 


l*9422lE-05 

3.9&8L6E-‘06 

1.9S052E-05 
3. 704J7L-06 

2.01624E-0b 

3.439aiE^06 

2*04976C-0S 

3.16474E-06 

2-07948E-05 

2.87933E-06 

2.tOSdOC-05 

2.58373E-06 

2a3lLlE-05 

2*27tt05E-06 

2.152316-05 

1.962396-06. 

2.17Q30E-05 

1.636386-06 

2.185006-05 

1.30163E-06 

2.19629C-05 

9.56841E-07 

2-20408 E-05 
6.02711E-07 


2.20829E-05 

2.39514E-07 

2.203336-05 

1.324296-07 

2.205606-05 

5.127446-07 

2.1 J853r*«05 


-6.61 196E-05 
-3.1 6245L-05 

-6.93U5E-05 

-3.221546-05 

-7.25621E-U5 

-3.279846-05* 

-7.537076-05 

-3-33755E-05 

-7.923686-05 

-3.39487E-05 

-8.266016-05 

-3.4520CL-05 

-S. 614066-05 
-3.509U t-CS 

-8.957836-05 

-3.56639E-05 

-9.327346-05 

-3.623996-05 

-9.69263E-05 

-3.68203C-05 

-1.006336-04 

-3.I4G64t-05 

-1.0440B6-04 

-3.79988E-G5 

-1.03238E-04 

-3*859826-05 

-1.121286-04 

-3.9204/6-05 

-l.l6C79t-L*4 
-5.953 183E-05 

-U2a09?l -04 


-1. 717196-06 
-2.970856-05 

-4.98018E-06 

-3.551796-05 

-3.836636-06 

-4.15/58E-05 

-1.3i095£-05 

-4.784566-05 

-I.84ia2h-05 

-5.42902L-05 

-2.4l7d2E-05 

-6.0872QE-05 

-1.060156-05 

-6.T5569E-05 

-3.76964E-05 

-7.430716-05 

-4.546B0E-35 

-3-1DB96E-05 

-V.39177E-05 

-a.7fi720£“05 

-6.30440E-05 

-9*462446-05 

-7.28425E-D5 

-1.01319E-04 

-8.33062E-05 

-1.07929E-04 

-5.4*^2546-05 

-1.144326-04 

-1.C6108L-04 

-l.2ua0dF-04 

-l.l85U2r-04 


-6.581396-05 

-3.1bB00t-jS 

-6.9CU08E-D5 

-3.22599E-05 

-7.22652E-05 

-3.283146-05 

-7.55765E-05 

-3.33966E-D5 

-7.894416-05 

-3.39579E-05 

-8.236736^05 

-3-45174E-35 

-a.5B474E-05 

-3.507746-05 

-8.93832E-05 
-3. 564016-05 

-9.29755E-05 

-3.62074E-05 

-9.6624SE-05 

-3.678086-05 

-1.0D332E-04 

-3*736tS£-Q5 

-i.04097E^04 

-3.795126-05 

-K07922E-04 

-3.85497E-05 

-i*uaoot-o4 

-3*915/36-05 

-1* 15754E-04 
-3.9/7386-05 

-I . 19/636-04 


9.9/73CE-07 

-9./2877E-09 

9. 066666-07 
-l.l5349E-08‘ 

9-954186-137 

-1.34U96-08 

9.939806-07 
-1. 53468E-08 

9.02346E-07 

-1*732606-08 

9.90512E-07 

-1.9335OE-08 

9.88476E-07 

-2.136176-08 

9.862386-07 

-2.339016-08 

9*837976-07 

-2.540706-08 

i '■ 

9.81156E-07 

-2.73985E-08 

9.703186-07 

-2.935C9E-Jd 

9.75207E-0T 

-3.i251Q£-0a 

9.720706^07 

-3.308566-08 

9.686 T3E-07 
-3.48424E-0B 

9.651056-0/ 

-3.650916-08 



9.61 3 “07 



THETAP 


PH IP 


7HETAE 


PHIE 


-l.2%lS7E-0^ 
-'t. 106^^8-05 

-1.31590E-04 

-1.33106E-04 

-1.238356-04 

-4.103126-05 

9.574946-07 

-3.952756-08 

-1.28305E-04 

-4.l69t>0E-05 

-1.451956-04 

-1.389996-04 

-1*279708-04 

-4.166996-05 

9.534758-07 

-4.085088-03 

-1.32506E-0^ 

-'#.2328^8-05 

-1.593816-04 

-1.44707E-04 

-1.32169E-04 

-4.231328-05 

9.493288-07 

-4.20595E-06 

-U3t*771L-0<# 

-4.296^4L-05 

-1.74128E-04 

-1.502216-04 

-1.36433E-04 

-4.295956-05 

9.450698-07 

-4.31221E-C8 

-1.‘»1099E-C^ 

-4.35993E-C5 

-1.89416E-04 

-1.55536E-04 

-1.407618-04 
-4. 360668-05 

9.4O7I0E-07 

-4.404G5E-08 

-l.4549lE-0^ 

-^.^23138-05 

-2.052268-0^ 
- 1 • t>3 tit 66-04 

-1.451546-04 
-4. 425238-05 

9.362608-07 

-4.481C28-08 

-U^99^6E-04 

-^.A3579E-05 

-2.21536E-J4 

-1.655516-04 

-1.4 >6128-04 
-4.489388-05 

9.317566-07 
-4. 542866-03 

-1.5^462E-C^ 

-^•5^76^E-05 

-2.33326E-04 

-1.7C2506-04 

-1.541338-04 

-4.552848-05 

9.271898-07 

-4^589536-08 

-1.590A1E-04 
-4. 608366-05 

-2.55575E-04 

-1.74744E-04 

-1.537178-04 

-4.615306-05 

9.225848-07 
-4.621 168-08 

-1 .636796-04 
-4.66 7t>7E-05 

-2.732646-04 
-1. 790376-04 

-1.633638-04 

-4.676426-05 

9.179558-07 

-4.638248-08 

-1.68375E-04 

-4.72522H-05 

-2.913736-04 

-1.831336-04 

-1.68069E-04 

-4.73585E-05 

9. 1 33156-07 
-4. 641406-08 

-1.731286-0^ 

-4.78C71E-05 

-3.098818-04 

-1.B7037E-04 

-1.728348-04 

-4.79325E-05 

9.036798-07 

-4.631626-08 

-1.77936E-04 

-4.83380E-05 

-3.287706-04 

-1.9075(16-04 

-1.776558-04 
-4./ 48236-05 

9.040598-07 

-4.61016E-08 

-1.827956-04 

-4.88416E-C5 

-3.48023E-04 
-1. 942986-04 

-1.825308-04 
-4. 900458-05 

3.994o5»07 

-4.578628-08 

-1.877036-04 
-4.93 1486-05 

-3.67620E-04 

-1.976696-04 

-1.874558-04 

-4.949558-05 

8.949078-07 

-4*538866-08 

.1 .1 / r. r 1 . w. 

.1 *4 1 / t < .. > t. 

.1 tt » i. » 1 f 4. .. 1 

.» «« i« 1 . t . » 





t ' ^ 

TIME 

. < . THE TAB 

angle 
. «ATHs 

7.702500 

-'i-09511E-03 

4.93478E-05 

’ ANGLE 
RATES 

7..02500~ 

-1.08991E-03 

5.47471E-05 

ANGLE 
y.. RATES 

7*«’02500 

-1.084 UE-03 
6.03U51E-05 

-ANGLE 
i . RATES 

. a.J0?500 

-1-07789E-03 

6.53b^5E-05 


ANGLE . 

8.102500 .... 

-1-07U0E-03 

::.-RATES.: ... 


.. 7.05882E-05 

U..., ANGLE-... 

8.202500 .. . 

-1.0G378E-03 

RATES:.. 

- - - 

. 7.57095E-05 

I^ancleV 

8.307 500-1..' 

.Tl.0559t)£-‘03 

U..RATCS^. 


8*078l9E-05 

1-ANGLE. .. 

.8.402500 

-1.04763E-03 

.RATESi_ 


S.57a4iET05 

LI ANGL^ 

B.502'500-. 

-1.03a8QE-03 

i. RATES..,. 



9.07150E-05 

!■ .JINGLE;^ 

B. <302500 . . . 

.-1.02949t-03 

. RAT£S., 


9.55736E-05 

lITANGLe T 

8-702400.. 

-l.019o9b-03 

RATES-. 

--- , -- - — 

. 1.003 59E- 04 

U-ANGLS*.^ 

-8.802500 .... - 

-1.00942E-03 

^KAT£S*„ 

— 

. L.05071E^04 

ELj^ngle.. 

-8.902500 

-.9*9 86 82 E- 04 

^ RATES * 

1 


. 1.0970SE^04 

I, ANGLin 

9.002500 

a 74038-04 

p:. RATES 

- - - 

I.14270E-04 

h angI e 

9.102500,1..! 

-9./583lE;-04 

1. rates . 


l,18757E-04 



* a /. 4 f 4 f; r 


M 

f:- 

i, 

t: 


PHI a 

THE TAS 

PHIS 

-2.00032E-03 

^2.59822E-04 

“2.047L9£-0'4 

-4.72169L-05 

2.18764E-05 

-1.29675E-06 

-2.02630E-03 

-2.598228-04 

-2. J9380E-04 
-4.60059 E-05 

2.17255E-05 

-1.69947E-Q6 

-2. 052288-33 
-2.59822£-04 

-2. L3899L-04 
-4.43952E-05 

2. 15351E-Q5 
-2.l08^5E-06 

-2.07826E-03 

-2.59d22E-04 

-2.18238E-04 
-4.24360 b-05 

2.n035E-05 
-2.523 76E-06 

-2.10425E-03 

-2.59022E-O4 

-2.22360 E-34 
-4,00664b-35 

2.10300E-05 

-2.94428E-06 

-2.13023E-03 

-2.59S22E-04 

-2.26232E-04 

-3.74J58E-35 

2.07143E-05 

-i.36970e-06 

-2.15621E-03 

-2.59822E-04 

-2.29324E-04 

-3.44647E1-35 

2.03553F-05 

-3.79958E-06 

-2.18219C-03 

-2.59322E-04 

-2.33139E-04 

-3.12a38fc-03 

1.99542E-05 

-4*23349E-06 

-2.2Lial7E-03 

-2.59822E-04 

— 2» 36066 b-04 
-2.79032t-05 

1.95Qd9£-05 

-4.d71l0H-06 

-2.234I6E-03 

'2.55S22E-04 

-2.38679E-04 

-2.43ti63E-03 

1.90197E-Q5 

-S.U2UE-06 

-2.26014E-03 

-2.59822E-04 

-2.409J4E-0** 

-2.07686E-05 

1.84B63E-05 
—5 • S5641 E— 06 

-2.2a612E-03 

-2.59822E-04 

-2.42825E-04 

-1.71Q68E-05 

1.79083E-05 

-6.D0383E-06 

-2.31210E-03 

-2.59822E-04 

-2.44351E-04 
- 1.345 33 t-05 

1.72a54E-Q5 

-6.4544QE-06 

-2.33809E-03 

-2.59822E-04 

-2.45514E-04 
-9.86032 E-06 

1,661 72 E-05 
-6-90819E-U6 

-2.36407E-03 

-2.59823E-04 

-2. 46323t-04 
-6.3/901E-06 

1.59336E-05 

-/.3o53dP-06 

- CtM A- r 4 

^ ' 7.j**r n/ 

1 1 1 / A A 1 , n •. 


TKETAP 

PH-IP 

THETA6 

-1.24167E-04 

-4.10644E-05 

-1.315906-04 

-1.331066-04 

-1.230356-04 

-4.103126-05 

-1.2B305E-04 

-4.16950E-05 

-1.45195E-04 

-1.38999L-04 

-1*279706-04 

-4.166996-05 

-L.32506E-04 

-4.232a9b-05 

-1.59381E-04 

-1.44707E-04 

-1.32169E-04 

-4.2JI32E-05 

-l*3677Ui-04 

-4.29644L-05 

-1.74L28E-04 

-1.50221C-04 

-1.36433E-04 

-4.29595E-05 

“U41099E-04 
-4. 359936-05 

-1.89416E-04 
-1. 555366-04 

-1.40761E-04 

-4.36066E-05 

-1.45491E-04 

-4.42313C-05 

-2.D5226E-04 

-1 . 60(4^766-04 

-I.45154E-04 

-4.42523E-05 

-1.49946E-04 

-4.43579E-05 

-2.21536E-04 
-1. 655516-04 

-1.4^6126-04 

-4*489386-05 

-L.54462E-C4 

-4*547648-05 

— — . j 

-2.38326E-04 
-1*702506- 0^ 

~ 1.54133E-04 
-4.55284E-05 

-1.5904IE-04 

-4.60836E-05 

-2.55575E-04 

-1.74744E-04 

-1.58717E-04 

-4*615306-05 

-J.63679E-04~^ 

-4*667676-05 

-2.73264E-04 

-1.79037C-04 

-T.63363E-04 

-4*676426-05 

-1.68375E-04 

-4.72522E-05 

-2*913736-04 

-I.a3U3L-04 

-1.68069E-04 

-4.735B5E-05 

-1.73128E-04 

-4.raC71E-Q5 

-3*0988lE-04 

-1.87037E-Q4 

-1.72834E-04 

-4.79325E-D5 

-I.7T936E-04 

-4.833806-05 

-3*287706-04 

-1*907566-04 

-1.77655E-04 

-4*648236-05 

-1.82795L-04 

-4.884I6E-C5 

-3.48023E-04 

-1.94298E-04 

-1. 825306-04 
-4.90045E-05 

-X. 877036-04 
-4.931486-05 

-3.676206-04 

-1.97669E-04 

-1.874S5E-04 

-4.94955E-Q5 

« 1 T j. r. 7 1 _ ■ * 

, 'l O 7 1. /. ? 1 

> .» 1 Wf ^ ,\f 


PHIE 

9.S!'494E-07 

-3.952T5E-08 

9.53^t75E-07 

-4.0a508£-03 

9.49328E-07 

'4,20595E-08 

9.45069E-07 

-4.3U21E-C8 

9-40710E-07 

-4-4Q4D5E-a8 

9.3626BE-07 

-4.4SIC2E-08 

9.31756E-07 

-4.54286E-03 

9.27189E-07 

-4.,5a953t-00 

9,22SH4E-07 

•4.62H8E-CJ8 

9.1795SE-07 

■4.63a24E-0Q 

9. 13315E-07 
■4.64l40E-0a 

9.03679E-07 

•4.63162E-08 

9.04059E-07 

•4.61D16E-08 

a.994ci5.E-07 

■4.57862E-D(1 

8.94907F-07 

■4.5388ijE-0>) 


' . TIME 

THE TAB 

PHIB 

THETAS 

9.302'i00 

•79.51202E-04 • 

-2.^l503E-03 

-2.46940E-04 

..RATES 

1.27500E-0^ 

-2.59323E-34 

5.91B/8E-08 

...ANGLE-. •!. <*02500 . 

-9. 3a239E-0A 

-2.49201E-03 

-2.'«6790E-04 

RATES 

1.31756E-0A 

-2.59823E-J4 

2.91ollb-J6 

” ANGti~9 . 53? 500~7Z 

-9.24854E-0A 

-2. 468 006-03 

-2.46367E-04 

. — rails... 

1.35933E-04 

-2.59U23E-04 

5.4a/a4E-06 

_ . ANGIE 9.<»}25G0 

.r9.ll056E-04 

-2.^93986-03 

-2. 45705E-04 

RATES 

. 1.4U030E-04 

-2.59323E-04 

7. 73475E-06 

ANGLE . . 9.702500 — 

-a.96B52E-0^ 

-2.51996E-03 

-2.^4335b-09 

RATES 

. 1.44047E-04 

-2.59B23E-04 

9.62734E-06 

ANGLE 9.802500 ... 

-d.8225LE-0^ 

-2.5959J2E-03 

-2.^3795E-09 

RAIFS 

1.4/982E-04 

-2.59B23E-0^ 

1. ll<*ldE-05 

ANGLE. . . 9.902500 

•8.67260E-04 

-2.57193E-03 

-2.42&24E-04 

RATES 

' l.51di3E-0^ 

-2.59a23E-04 

1.22602E-05 

ANGLE 10.002500 

-B.5iaaflE-o4 

-2.59791E-03 

-2..91362E-09 

.RATES . 

. 1.55599E-04 

-2.59tt2it-0^ 

1.29/116-05 

_ ANGLE _L0. 102500 

-B.36144C-04 

-2.623B9E-03 

-2.^0050E-0^ 

RATES , . 

1.592 7BE-04 

-2.5902'tb-0^ 

1. 32699E-05 

I ANGLE .-10.202 500 

~^.20037t-04 

-2.6^9876-03 

-2.i8/29E-D^ 

.RATES . .. 

1.623odE-04 

-2.5982^E-04 

1.31565E-05 

~ ANGL E .Tl 0 . 3 02 500 

-8.03575E-04 

-2.67586E-03 

-2. 37939E-09 

— RATES 

l.t*o367E-04 

-2.59B24E-04 

1.26409E-05 

ANGLE 10.^02500 

-7. a676BE-04 

-2.70l0^E-03 

-2.36221E-09 

; RATES * 

I.69771L-04 

-2.59324E-04 

1.17353£-05 

ANGLE 10-5J250Q 

-7.69t*25E-04 

-2.72782E-03 

-2.351 l2b-0^ 

RATES 

1.73080L-04 

-2.5982^E-04 

L. C^520£— 05 

.- ANGLE 10.502500 

"-7.52157E-04 

-2.75380E-03 

-2. 3<»l48b-04 

_ RAIrS 

1. 7to2U9E-04 

-2.59B29E-0^ 

8.0A65/L-36 

U ANGi E i0.r02500 

-7.34372E-04 

-2.779796-03 

-2.333516-0^ 

L RAILS 

1. 79395E-04 

-2.59824b-04 

o.9?J9<#t-U6 

^ ^AN(*I E 10. .)?5u0 

-7. 1«2'UI -04 

-?.H05 77b- J3 

-2. 4/ /MU -O^t 


PHIS 


THEIAP 


FHIP 


iHETAb 


PH IE 


1.933826-05 

-d.29105b-0b 

-1.976526-09 

-5.01578E-05 

-9.07787E-09 

-2.03933E-09 

-1. 979996-09 
-5.037096-05 

8. 359256-07 
-9.993856-Oa 

1.3985oE-05 

-8.760236-06 

-2.02686E-09 

-5.05219E-05 

-9.28J26E-09 

-2.06899C-09 

-2.02500E-09 

-5.07983E-05 

3.815086-07 

-9.393916-08 

1.25869E-05 

-9.23921L-06 

-2.07755E-09 

-5.08999E-05 

-9.99199E-09 

-2.09618C-09 

-2. 075916-09 
-5.108296-05 

8.77139.E-07 

-9.396396-08 

1.16386L-05 

-9.713956-06 

-2.128536-09 

-5.112296-03 

-9.70292E-J9 

-2.122696-09 

-2. 127196-09 
-5.137206-05 

8. 728156-07 
-9.309656-08 

1.06930E-05 

-1.019856-05 

-2.17977E-09 

-5.135576-05 

-9.91599E-09 

-2.19789E-09 

-2.17869E-09 
-5. 161396-05 

8.68529E-07 

-9.27226E-08 

9.598506-06 

-1.068976-05 

-2.23122E-09 

-5.15909L-05 

-5.13199E-09 

-2.17203E-09 

-2.23035E-09 

-5.180566-05 

8.69268E-07 

-9.253036-08 

8.509/5E-06 
-1. 11878E-05 

-2.28283E-C9 

-5.1&773E-05 

-5.35029E-09 

-2.19511E-09 

-2..:B2226-09 

-5.199726-05 

8.60018E-07 

-9.250«9E-C8 

7.36072E-06 

-1.169326-05 

-2.3395t:£-09 

-5.17638:-U5 

-5.570906-09 

-2.217206-09 

-2.33922F-09 

-5.20372F-05 

8.55760E-07 

-9.269906-08 

6.15578L-06 

-1.22053C-05 

-2.38539E-09 

-5.180006-05 

-5.793o86-09 

-2.23837E-09 

-2.38627E-09 

-5.207996-05 

0.519706-07 

-9.319196-08 

9.919106-06 

-1.272/76-05 

-2.938136-J9 
-j. 178556-05 

-6.C18536-09 

-2.23867E-09 

-2.938396-09 

-5.2J6026-05 

8.97121E-07 

-9.38789E-08 

3.619896-06 
-1.325 7*16-05 

-2.9B988F-C9 

-5.17204E-05 

-6.29536E-09 

-2.278196-09 

-2.9V0376-09 
-5. 199296-05 

8.926F1E-07 

-9.995086-08 

2.267126-06 

-1.379716-05 

-2.59159E-09 

-5.16053E-05 

-6.979116-09 

-2.29o89E-09 

-2.5^2306-09 

-5.187366-05 

3.381 166-07 
-9.639766-08 

B. 599926-07 
-1.93958E-05 

-2.59307E-09 

-5.19908L-05 

-6.7J9O96-09 

-2.319786-09 

-2.599096-09 
-5. 170306-05 

8.333856-07 

-9.B2576E-08 

-6.025076-07 
-1 .990956-05 

-2.599906-09 

-5.l22rtlL-05 

-6.937036-09 

-2.3320UE-09 

— 2.69 5t»dt -09 
-5.198236-05 

a.23t96£-07 

-5.05672C-J8 

-2.121386-06 

-1.59/391-06 

-2.595506-09 

-5.096876-05 

-7. 17105E-09 
-2.398536-09 

-2.69/03F-09 
-5. 121306-05 

. 32516-07 
-5. 336026- 08 

- j.69/n7f-05 

- U 1- 39 

- 7.90:. /Lil -09 

7*8 J.‘U -09 

1 //M • - '/ 


II «E 


fHfcTAB 


pHia 


thetas 




ANGLE 

RATES 

10.902500 

-^6.97893E-04 

1.85291E-04 

-2.8J175E-03 

-2.59825E-04 

-2. 324336-04 
2.29017E-06 

ANGLE 

RATES 

11.0 >2500 

-6.792316-04 

I.88u73E-04 

-2.a577iE-03 

-2.59d2^>E-04 

-2. 323376-34 
-3.29137L-07 

. ANGLE 
^ATES 

11.102500 - 

-6.60289E-04 

1.9C740E-04 

-2.db3 72E-03 
-2.5982bE-0^ 

-2.32513E-34 

-3.03837E-06 

. ANGLE 

rates 

11.202500 

-6.4lU87t-04 

1.932d9E-04 

-2.9o970E-03 

-2.!>9d2ic-0'> 

-2. 329ci4 6-3'« 
-5.93747t-06 

. angle 

RATES 

11.312500 

-6.21637E-04 

1.95716E-04 

-2.935oaE-D3 

-2.59d2Dt-04 

-2.33705L-34 

-d.82494£-06 

angle 

rat6s 

M.V32^0D 

-6.01950E-04 

1.9331BE-04 

-2.961t>6E-03 

-2.09d2‘>E-04 

-2.347336-34 

-l.l6>8bE-05 

ANGI E 
KAfES 

ll- jj?500 

-5.32039G-04 

2.001936-04 

-2.'»d76bfc-03 

-2.59d2bfc-04 

-2.360466-04 

-1.450636-05 

.ancle 

RATES 

11.612500 

-5.619iaE-04 

2.022366-04 

-3.01363E-03 

-2.b9826E-04 

-2. 37634E-J4 
-1. 71972E-05 

-ANGIE 

-RATES 

11.732500 

-5.415 186-34 
2.041466-04 

-3.039tjlE-03 

-2.5982OE-04 

-2.394826-04 

-1.97217E-35 

ANGLE 

RATES 

ll.d02500 

^5.2l095C-04 

2.059196-04 

-3.06559E-03 

-2.%9826E-t)4 

-2.415726-04 

-2.203316-05 

_ ANGIE 
RATES 

Jll. 902500 1 

-5.004216-04 
2. 075546-04 

-3.09l58C-0i 

-2.598266-04 

-2.438816-04 

-2.408796-05 

...ANGLE 

RATES 

32.002 500 

-4.79591L-04 

2.09J47E-04 

-3.11756E-03 

-2.590266-04 

-2.4O379E-04 

-2.58465E-05 

ANCLE 

rates 

-12.132500 

-4.58619E-04 
2 10397E-04 

-3.143546-03 

-2.59326E-04 

-2.49037E-04 
-2. /2/38E-05 

ANGLE 

RATES 

12.232500 . 

-4.37519E-04 
2. ll(>G2fc-04 

■ 3.169526-03 
-2.59b2ot-04 

-2.518196-34 

-2.B3399E-05 

ANGI E 
« UfcS 

. 12. iv)2500 

-4. 16306E-04 
2.126616-04 

-3.195516-03 

-2.593276-04 

-2.54:>.i9h-04 
-2.902 J51-05 

A 4f.{ f 

1 2 . f )25iiO 

-3.9'«9 -94 

- *.271 -.11-0 1 

-.7 . *j 7 ri\)5 ) ; .)4 



PHIS 


THETAP 


PH!P 


'HETAE 


PHIE 


-b.332'^4e-06 

-lv6642dE-0!i 

— 7 • 026 / oc - 06 
-1.72^i9£-05 

-B.78176L-06 

-1.785olE-05 

-I .069BSL-05 
-1 . d4796fc-05 

-1.24782E-05 

-1.9ll^<rF-C5 

-l.^t^220C:-05 
-1.976061 -06 

-1.6^309t-05 

-2.04130b-06 

-l.85062t-06 
-2. I Jd66E-06 

-2.06^881-05 

-2.1766U-05 

-2.28599E-05 

-2.2V563F-05 

-2.5U06C-D5 

-2.31567L-05 

-2.7't9lPF-05 

-2.ia670£-35 

-2.99l^5E-05 

-2.A5866F-05 

-3.24096E-J5 

-2.531-^9F-06 

-3.A97001-U5 

-2.605l4E-0^ 

1 i! -O i 


-2.79680E-0fi 
-5.0i 165E-G5 

-2*d<i6y2L-u^ 

-'#.992/9u-‘>6 

-2.896o^L-04. 

-^.950C7E-05 

-2.9-t59lL-uA 

-'•.9037^1-05 

-2.99^o9E-0^ 

-^.85A04E-C;5 

-3.OV297E-0A 
tfO 125E-U5 

-3.09070E-0<^ 
-4.7^ 564>t—05 

-3.l3787E-0^ 

--♦•68745E-C3 

-3*1 •tic-04» 
-4.62695E-05 

-3.23C39E-04 

-/t.56A3aE-05 

-3.27571 E-J^ 
-^.49S96E-05 

-3.32038E-0<^ 

-^.^339lE-05 

-3.36A38L-3^ 

-A.3664rlE-05 

-3*A0770E-04 

-A.29762E-05 

-i*^5033fc-u^ 
-<i.22 7u9L-J6 

- i * ’ ll - ' ♦ 


-7.S<*3B9E-0^ 

-2.37953F-04 

-7*tttJ257E-0^ 

-2.39^02E-0^ 

-8* 122o6E-0^ 
-2.407d3E-J^ 

-8.364lOE-3^ 

-2.fr2096L-y‘f 

-8.63b82L-0!^ 

-2.^33^0£-04 

-a.36375t-3'» 
-2.A^6l 3E-0<^ 

-9.0 J5hI£-0^ 
-2.466) 3E-04 

-9.34194E-Q4 

-2.46639E-34 

-9.589060-04 

-2.47588E-04 

-9.8370dE-J4 

-2.46459E-04 

-1.C0359E-03 

-2.49248E-04 


-1.03355E-03 

-2.49955E-04 

-1.05858E-03 

-2.50575E-04 

-l.C8366E-0i 

-2.5il09E-04 

-l.l3a8CE-03 

-2.5i554l:-04 

I . I M . n -0 i 


-2.79880E-04 

-5.05367E-05 

-2.849l3t-04 

-5.01342E-05 

-2.a0904L-04 

-4.96923E-05 

-2.94849E-04 

-4.92133E-06 

-2.99745F-04 

-4.87316E-05 

-3.045d8E-04 

-4.81586E-05 

-3.U7375E-J4 

-4.75876E-05 

-3. 14104E-04 
-4.69914E-05 

-3.l8?72t-04 

-4.63729E-C5 

-3.23377E-04 

-4.57345E-05 

-3.27918E-04 

-4.50787fc-05 

-3.32392E-04 

-4.44077E-35 

-3.36793E-04 

-4.’7235E-05 

-3.41136E-04 

-4.302/dL-05 


-3.46403E-04 

-4.23222E-05 

~ U -*U 


3.lld93C-07 

-6.05159E-0B 

8.C5622E-J7 

-6.4929a£-08 

7.9J380E-07 

-6.99292E-03 

7.916086-07 

-7.55297E-J8 

f.83745E-C / 
-a. 17433E-U6 

7.75229E-07 

-d.86782E-0d 

7.65999E-07 

-9.60389E-08 

7.55990E-07 
-1.04126E 07 

7.45142E-07 

^-I.l2d39C-37 

7.333916-07 

-1.22173E-07 


7.20676E-07 

-I.32124E-07 

7.06935E-07 

-1.426B3E-07 

6.92109E-07 

-1.53847E-07 

6.76136E-37 

-1.65o0BE-07 

6.589676-07 

-1.7^9646-07 

. I H - .1 7 



Tl>^fc 


THETAB 


PHI6 


THETAS 


PHIS 


12.S02S00 


-t3.7359RE-0^ 

2.1^336E-0^ 


-3.247V7E-03 

-2.59827E-09 


-2.60529E-0^ - 
‘2.9l57oh-05 


-4.0337'»e-0t> 

-2.75^6lE-05 


l?.t»0?50D 


-3.5213^fc-04 

2.l49blt-04 


-3.27345E-03 

-2.S9827E-04 


-2.634I7E-04 

-2.35962E-05 


-4.31299E-05 

-2.83032E-0S 


12.702900 


-3.3D616L-04 
2. 19417E-04 


-3.29944E-03 

•2.59827E-J4 


-2.t>o227t-04 
*2. 76138E-05 


-‘♦.S99i<»E-05 

-2.906t>9C-Oii 


12.832900 


-3.09058b-04 

2.15736E-04 


-3.32542E-03 

-2.59827E-04 


-2.68918E-04 

-2.62177E-05 


-<i.d94 34F-05 
-2.93338L-09 


12.902500 


-2.tt7476E-04 
2. 19907E-04 


-3.35143E-03 

-2.99827E-04 


-2.71450L-09 

-2.44219E-05 


-5. 19654C-05 
-3.063to4E-05 


13.032500 


r2.65834E-04 

2.l5932b-04 


-3.3773BE-03 

-2.59U2/L-04 


^2.73/826-04 

-2.22432E-05 


-5.50o50E-05 
-3. 1383TE-05 


1 i. 102500 


-2-44297E-04 

2.15011E-04 


•3.40337E-03 

-2.59827E-04 


-2. 758 79E-J4 
-1.97l45t-05 


-5.824246-05 

-3.2l6;>3E-05 


.13.2 J2500 _ 


■2.22729E-34 

2.15547E-04 


-3.429J5E-0i 

-2.5982/E-04 


-2.777066-04 
- 1. 68bu6fc-05 


“6. 14982E-05 
-3.29514L-05 


1 3.302500 


-2.0U95E-04 
. 2.151hIE-04 


-3.455 33E-03 
-2.59827E-04 


- 2 . 7 ^ 2336-09 
-1.371 9/6-05 


-6.483296-05 

-3.37421E-05 


13.402500 


-1.79708E-04 
2. 145966-04 


-3.4bl32E-03 

-2.59828E-04 


-2.804346-04 

-1.03326E-J5 


-6.82669E-35 

-3.45380E-05 


13.502500 


-1.58283E-04 
2. 13914E-04 


-3.50730E-03 

-2.598286-04 


-2.81285E-04 

-6.743516-06 


-7.17407E-05 
-3. 533946-05 


li. 602500 


-1.36932E-04 

..2.13097E-04 


-3.533286-03 

-2.598286-04 


-2.817706-04 

-3.0L002E-06 


-7.531S0E-05 

-3.614716-05 


13.702500 


-1.156706-04 

2.12149E-04 


-3.559266-03 

-2.59828E-04 


-2.818756-04 

8.480196-07 


-7.897046-05 

-3.69619E-05 


13.802500 


-9.45092E-05 
2. 1 10726-04 


-3.58525E-03 

-2.59828E-04 


-2.81593E-04 

4.749196-06 


-8.27077E-05 

-3.77848F-05 


13.902500 


-7.346236-05 

2.098696-04 


-3.611236-03 

-2.598286-04 


-2.809206-04 

8.651296-06 


-8.65278F-05 
-3. 861681-05 


I H. 002 500 


-5.254I9F-05 -3.6372lF-0i -2. 798601-04 -9.0'f3I5J -0‘i 



TH6TAP 

I P 

thetae 

PHIE 

-3.533466-0^ 

-4.084/86-05 

-1. 159176-03 
-2. 521696-04 

-3.537246-04 

-4.008556-05 

6.20744E-07 

-2.044626-07 

-3.573946-04 
-4.01 1926-05 

-1.1844CE-03 

-2.523396-04 

-3.577766-04 

-4.015O0E-05 

5.995916-07 

-2.106146-3/ 

-3.61 3696-04 
-3.938156-65 

-1.2C964F-03 

-2.524146-04 

-3.61755L-04 

-3.941926-05 

5. 769916-07 
-2.33365E-07 

-3. 652/06-04 
-3.863^66-05 

-I.234S0E-03 

-2.5ii3966-04 

-3.656606-04 

-3.867526-05 

5.52883E-C7 

-2.48794E-C7 

-3.69095E-C4 

-3./8779L-C5 

-1.260116-03 

-2.522856-04 

-3.69490E-04 

-3.792326-05 

5.272C2E-C7 

-2.64868E-07 

-3.72895E-C4 

-3.711056-05 

-1.28533E-03 

-2.5208CE-04 

-3.732446-04 

-3.716256-05 

4.99870E-OT 

-2.81640E-07 

-3. 76517E-04 
-3.633156-0:' 

-1.310526-03 
-2.51 784C-04 

-3. 74922E-04 
-3.63916E-05 

4.70841E-07 

-2.99153F-C7 

-3. 801116-04 
-3.55394L-05 

-1.335686-b3 

-2.513966-04 

-3.805226-04 

-3.5o0916-05 

4.4CJ136-07 
-i. 1 74566-07 

-3.8362^6-04 

-3.473266-05 

-1.360806-03 

-2.5092U6-04 

-3.H404 36-04 
-3.481326-05 

4.0/3126-07 

-3.36610E-C7 

-3.87056E-L4 

-3.39094L-05 

-1.385866-03 

-2.50356E-04 

-3.874846-04 

-3.400176-05 

3. 72651E-C7 
-3.5668CE-07 

-3.90405E-C4 

-i.30o//6-05 

-1.41037E-03 

-2.49/076-04 

-3.90043E-Q4 

-3.317246-05 

3.35934E-07 
-3. 777406-07 

-3.93669E-04 

-3.22Q54E-05 

-1.43580E-03 

-2.48975L-04 

-3.941186-04 

-3.23230E-05 

2.97057E-07 

-3.99074E-C7 

-3.968466-04 

-3.132026-05 

-1.46066E-03 

-2.48164E-04 

-3.9/307E- 04 
-3. -45116-05 

2.55910E-07 

-4.231696-0/ 

-3.99932E-04 

-3.040996-05 

-1.485436-03 

-2.47277E-04 

-4.004076-C4 

-3.05540E-05 

2.123706-07 

-4^47719t-07 

-4.029266-04 

-2.94721E-05 

-1.5101 16-03 
-2.463156-04 

-4.034166-04 
-2.962936 05 

1 .663086-0 / 
-4. 736256-07 

-4.056251- J4 

-1. 534096-03 

-4.05 «32f -04 

l.l /sii/r-o/ 



TIME 

THETAB 

PHlB 

THETAS 

PHIS 

THETAP 

PI IP 

thhtae 

PHIH 

_ atiKLE 
RATES 

. 12:502500 

t3.7359«E-0A 

2.1A336E-04 

-J.24747E-03 

-2.59827E-04 

-2.60529E-04 

-2.9l576t-05 

. -4.03374E-05 
-2.75461E-05 

-3.3334GE"04 

-A.0!l478E-Q5 

-1.15917E-03 

-2.S2169E-04 

-3.5372Ab-04 

-A.0aa55H-05 

6.2074aE-07 

-2.0AA62E-07 

. ANGLE 
RATES 

. 12.b0250a 

-3.52I34E-04 

2-L4951E-04 

-3.27345E-03 
-2. 598276-04 

-2.63417E-04 

-2.35962E-05 

-4.31299E-05 

-2.83032E-05 

-3.57394E-04 
-4.01 I92t-0b 

-UIBAACE-OT 

-2.52339fc-04 

-3.57776E-04 

-4.01560E-05 

5.995916-07 

-2.18614E-07 

ANGLE 

RAILS. 

Jl2.7Q2SOO. -- 

-3.3Q6X6L-0A 
2. 15A17E-0A 

-3-29944E'-03 

-2-59827E-04 

-2.6b227t-04 
-2. 76133E-05 

-‘t.SyVBtE-OS 

-2.906S9C-05 

-3.t>13L9£-04 

-3.9361St-o5 

-1.2C964E-03 

-2.52414E-04 

-3.617556-04 

-3.94192E-05 

5.76991E-C7 

-2.333eiE~07 

ANGLE 

-RATES 

- I2.da2t>00 

-3.3905aE-QA 

2.15736E-04 

-3-32542E-03 

--2-59827e-04 

-2.6B910E-04 
-2.62177E- 05 

-4, 894 34E-05 
-2,933386-05 

-3.O5270E-04 

-3.fi634i>L~05 

-1.23430E-03 

-2.5«;396E-04 

-3.65660E-04 

-3.807526-05 

5.52dti3f-C7 

-2.4B79aE-C7 

.ANGLE 

..RATES 

12.V0250Q 

-2.b7476E-04 

2-15907E-04 

-3.35143E-03 

-2.39827E-04 

-2.7ia50L-0‘» 

-2.a42lSE-05 

-5.l965^E-05 

-3.060t>4E-05 

-3.69095E-C4 

-3.7B779L-C5 

-1.26011E-03 

-2.522U5E-04 

-3.69490E-04 

-3.79232E-05 

5.272C2E-07 

-2.6AB6a£-07 

. ANGLE 
. RATES. 

...13,032500 . 

r2.658aA£-04 

2.15932E-04 

-3.37738E-03 

-2.59827L-04 

-2. 73782E-04 
-2.22-’»52E-Q5 

-5.50o50E-Q5 

-3.13837E-05 

-3.72845E-04 

-3.71105b-05 

-1.2B533E-03 

-2.52030E-04 

-3.732446-04 

-3.716256-05 

4.9987BE-07 

-2.8164GE-07 

’ AWGLE^ 
BATES 

r~li. 102500 

-2- A42V.7E-04 
2.15011E-04 

-3.a0337E-03 

-2.593276-04 

-2. 7bd79£— J4 
-l.97l'*5fc-05 

-5.32424E-0S 

-3.2l6a3E-05 

- 3 . 76517E-04 
-3.63315L-05 

-l.31052fc-Q3 
-2.51 7B4E-04 

-3.7-i922E-0A 

-3.&3916E-05 

A.70641E-07 

-2.99153E-07 

-.ANGLE- 

RATES. 

.13,2 J25Q0 _ 

-2.22729E-34 

2.15547E-04 

-3.429J5E-03 

^2.59827C-04 

-2.T7706t-04 
- I*68bu6t-05 

-6,149826-05 

-3.29514L-05 

-3. 801116-04 
-3.55394L-05 

-l,3356a£-t)3 

-2,513966-04. 

-3.805226-04 

-3.5o091£-05 

4-403136-07 

-3,174566-07 

.. A.'iJGLE- 
_RATtS. 

3, 302 500. . ... 

.-2.D11Q5E-04 
- 2-15l%lE-04 

-3-455S3E-03 

-2.59a27E-04 

-2. 7^2336-04 
-i.3719/t--05 

-6,483296-05 

-3.374216-05 

-3.836246-04 

-3.473266-05 

-1,360806-03 

-2.5092OE-04 

-3*840436-04 
-3. 481326-05 

4.013126-07 

-3.36610E-C7 

ANGLE- 

RATES-. 

_13, 402500 

-1.7970BE-04 

7,l459f>E-04 

-3.4bl32E-03 

-2.59828E-’04 

-2.Q0434C-Q4 

-1.03326E-05 

-6,B2469E-35 

-3.453dOE-05 

-3.8?05ijE-L4 

-3.390946-05 

-1.385866-03 

-2.50356E-04 

-3.d7484£-C4 

-3.40D17E-05 

3. 726516-07 
-3.5668GE-07 

ANGLE 
- RATES. 

Zi3^5QZ5QoS7.Z. 

-l,582B3E-04 

2.I3914E-34 

-3.5073QE-03 

-2,59U2aE-04 

-2.512856-04 

-6.74351E-06 

-7.17407E-35 

-3.SJ394E-05 

-3,9D405E-C4 

-3.30O/7E-05 

-1.4103 7E-03 
-2.49 707E-04 

-3.9DG43E-04 

-3.317246-05 

3.359346-07 
-3. 777406-07 

-ANGLE. 

RATES. 

...13*602500 

-1.36932E-04 
. .2.13097E-04 

-3-5332BE-03 

-2.5982BE-04 

-2.B1770E-04 
-3. QOD02E-D6 

-7. 531506-05 
-3.61471E-05 

-3.93669E-04 

-3.22Q54E-05 

-1.433aDE-0i"~ 

-2.48975h-04 

-3.941186-04 

-3.23230E-05 

2.97057E-07 

-3.99B74E-C7 

..ANGLE XT. 702500 

. RATES... . 

■-1.15670E-04 

2.12149E-04 

-3.559266-03 

“2.59B2UE-04 

-2.aifl75E-Q4 
d. 480196-07 

-7.89704E-05 

-3.696196-05 

-3.96B46E-04 

-3.13202E-05 

-1.46066E-03 

-2,4BL64E-04 

-3.97307E- 04 
-3.^45116-05 

2.559106-07 
-4.23169.6-0 7 

ANGLE 

RATES 

...13.802500 

-9.4S092E-05 

2.11G72E-0A 

-3.585256-03 

-2.5982flE-04 

-2.815936-04 

4.74919E-Q6 

-G.27077E-05 

-3.77848F-05 

-3.99932E-04 
-3.04 0996-05 

-1.485436-03 
-2. 472776-04 

-4.00407E-C4 

-3^055406-05 

2.123706-07 

-4-477196-07 

ANG<. E 
_ RAT'-S 

13-902500 . 

-7-35t>?3E-05 
. 2.09U69E-04 

--3,6ll23E-03 

-2.598286-04 

-2.80920L-04 

8.051296-06 

-8.tj527liF-05 

-3.86l6dt-05 

-4.02926H-04 
-2.94 721E-05 

-1.5101 16-03 
-2.463156-04 

-4.03416E-04 
-2*962936 05 

1.6630tiF-07 

-4.736256-07 

Am,* £ 

I't, 0 . 1 ? 50.1 

-5.254J9F-05 

-3.6372lF-0i 

79860 < -04 

-9,04 315! -05 

*•4,04 6i'5i. - j4 

-1. 534096-03 

-4,0633jr-04 

1 , 1 7 


THETAS 





TIME 

' THETAB 

PH IB 

ANGIE 

rates 

U* 102500 

-3.17600E-05 

2.07a9aE-'J4 

-3.66320E-03 

-2.59828E-04 

ANGLE 

RATES 

14.202500 

-KU285E-05 

2.05536E-04 

-3.68918E-03 

-2.59B28E-04 

AMGl E 

raies 

14*302500 

9.3412SE-06 

2.03862E-04 

-3.71516E-03 

-2.59828E-04 

ANGLE 

RA7FS 

14-4^2500 

. 2.963B0E-05 

2.02077E-04 

“3*741l4E-33 

-2.S9B28E-04 

ANGLE 

RATES 

14*502500 

4.975u9F-05 

2.001B5F-04 

-3.76713E-03 

-2.59B2BE-04 

ANGLE 

RATES. 

l4*b025Q0 

6.96695E35 
1.9al89' 04 

-3.79311E-03 
-2. 59828E-04 

ANGIE 
RATES - 

14.732500 

,8.93833!, 05 
J.96091L-04 

-3.61909E-03 

-2.59B28E-04 

ANCLE 

RATES 

I4.tn)2500 

1.08802E-04 

1.9389>F-04 

-3.84507E-03 

-2.59828E-04 

angle 

RATES 

14.902500 

1.2»'l5 ib-a4 
X.91601E-04 

-3.87106E-03 

-2.5va28E-04 

ANGLi 

rates 

15.002560”’ 

1.47193E-G4 

l.a9214r.-04 

-3.89764E-03 

-2.59U28E-04 

ANGLE . 
RATES 

15.102500. 

. . 1.65995E-04 

1.86735C-04 

-3.92302E-D3 

-Z.5Va2BE-04 

ANCLE 

ratfs 

15.2 32500 ~ 

1.84540E-04 

1.84166E-04 

-3.94901E-03 

-2.59827E-04 

angle 

RATES 

15.302500 

2.02824E-04 

1.81508E-04 

-3.97499E-03 

-2.59B27E-04 

ancle 

RATES 

15-402500 

2.2Q837t-04 
1. 7J763E-04 

-4.OV.O97E-03 

-2.69827E-04 

ANGLE' 
RA- ES 

15,502500 

2.3d572F-04 

1.759321-04 

-4.02O95F-03 

-2.59B27E-04 

ANG* r 

t 

? . <;».G t It - 11, 

-A .ns »'i •! 1 








-2.7842UE-0'i 

1.6Z505E-05 

-2.Te>612E-04 

1- 9a4b7t-05 

-2. 74455E-04 
2.32434fc-05 

-2-71971E-04 

2- 6i967L-05 

-2.691BoE-04 

2.92o62t-35 

-2,ot.l3J£-04 

3«iai63fc-35 

-2.62BJ7C-04 

3.4l>l63t-05 

-2.’59343E-04 

3.:>a4oaE~a5 

-2. o1>6B6E-04 
3. /2706E-05 

-2.51907E-04 
3. J2925E-D5 


PHIS 

- 9 - 44200 E -05 

- 4 . 03122!>05 

“ 9 .B 4944 F -05 

- 4 . 1 I 774 F -05 

- 1 . 026 S 6 E -04 

- 4 . 205 b 0 E- 0 & 

- 1 . 0690 b F -04 
- 4 . 29482 t-Di 

- 1 . 11246 E -04 

-4.3>)549E-05 

- 1 . 1567 HE-Q 4 
- 4 . 47765 F -05 

- 1 . 20202 E -04 

- 4 . 5 /l 31 t -05 

- 1 . 24821 E -04 
“ 4 « 66648 fc -0 5 

- 1 . 295 36 E -04 
- 4 . 76314 E -05 

- 1 . 34348 E -04 

- 4 .B 6 l 24 f .-05 


- 2 . 4 B 047 E -04 - 1 .3 I 259 E -04 

3 .B 399 BE -05 - 4 . 96071 E-Q 5 

- 2 .'i 4 l 4 dE -04 - 1 . 4427 OE -04 

3 . 9 U 922 E -05 - 5 . 06146 E -05 

- 2 . 4 D 250 E -04 - 1 . 49333 E -04 

3 . 0 U 759 E-O 5 - 5 . 16 J 40 E -05 

- 2 .J 6393 C -04 - 1 . 5459 dF -04 

3 .CJ 2636 E -05 - 5 . 26640 E -05 

- 2 . 3261 /C -04 - 1 . 5 J 916 E -:04 

3 . 7274 U -05 - 5 . 37033 E -05 

- I 4 t It - ’ i<< 



THETAP 

PH IP 

THETAE 

- 4 . 0 b 626 E -04 

- 1 . 55916 E -03 

- 4 . 09150 E -04 

^ 2 . 75050 E -05 

- 2 . 44 Lb 5 E -04 

- 2 . 76871 E -05 

-^ 4 . 11325 £-C 4 

- 1 . 5 B 35 :f -03 

- 4 , U 867 E -04 

- 2 . 64713 E -05 

- 2 . 4 J 022 E -04 

- 2 . 66649 E-Q 5 

- 4 - 139 L 3 E-G 4 

- 1 .&D 77 £ 3 E-D 3 

- 4 . 14481 E -04 

- 2 - 540 L 5 t-U 5 

- 2 . 41 799 E -04 

- 2 * 55057 E -05 

“ 4 .l 6403 b “04 

-l,fa 3188 E -03 

'- 4 . lb 987 E -04 

- 2 * 429 j 7 t “05 

- 2 . 405 ldt -04 

- 2 . 45074 E-D 3 

- 4 . 18776 E -04 

-l* 65586 E -03 

- 4 .l 938 lE -‘04 

- 2 . 31465 E -05 

- 2 . 39 L 83 L --04 

- 2 . 33682 E -05 

- 4 . 21 Q 31 E -04 

-i* 67971 E -03 

- 4 * 21659 L -04 

- 2 . 19564 E -05 

- 2 * 37796 E -04 

- 2 . 2 L 867 E- 0 S 

- 4 - 23165 E -04 

- 1 . 70342 E -03 

- 4 * 2 i 316 t -04 

- 2 *U 72 B 4 £-g 5 

- 2 *ici 360 E »04 

- 2 . 09615 E -05 

- 4 . 25174 E -04 

-U 7269 BE -03 

- 4 . 25349 E -04 

- 1 . 94557 E -05 

- 2 . 348 V 7 E -04 

-l* 9 fa 917 E -05 

- 4 . 270541-04 


- 4 . 27752 F -04 

- 1 . 614 ^ 0 E-(j 5 

-* 2 * 33349 E -04 

- 1 . 83769 L -05 

- 4 . 2 a 800 [l-a 4 

-U 77365 E-Q 3 

- 4 . 295221-04 

- 1 . 67 B 12 E -05 

- 2 * 31 f 77 E -04 

- 1 . 70169 E -05 

- 4 . 3040 flE-j 4 

-l* 79674 E -03 

- 4 . 311531-04 

-K 53794 L -05 

- 2 . 30163 L -04 

- 1 . 561181-05 

- 4 . 3 lS? 4 E -04 

-U 81968 E -03 

- 4 . 326421-04 

-l. 39355 t -05 

- 2 - 2 B 50 BE-D 4 

. - 1 . 416241-05 

^ 4 . 33 l 93 E -04 

-L* 842 «‘ 4 r-t )3 

- 4 . 339846-04 

^l* 24502£-05 

-‘ 2 . 268 ilE -04 

- 1 . 266971-05 

- 4 . 34362 b-Q 4 

- 1 . 86504 E -03 

- 4 . 351741-04 

-L. 09250 E -05 

- 2 . 250 / 3 E-Q 4 

- 1 . 11351 E -05 

^ 4 * 35376£--04 

-l*aa 746 C -03 

- 4 . 362081-04 

- 9 . 36159 E -06 

- 2 * 2329 Jt -04 

- 9 . 560491-06 

- ^ ^ > 1 M - ' t 

- 1 ; 'j r j ; * «M 

- '4 1 H i* \ - f 

— 



— 


PHIE • 

6 . 60424 E -98 
5.2 99 UE -07 

1 . 15270 E -08 

3 . 60502 B -07 

4 . 6136 CE -08 

S.92a6lE-07 

1 . 07129 E- 07 , 

6 . 27090 E-Q 7 

1 . 71642 E -07 

6.632B4E-07 

2 . 39879 E -07 

7 . 01531 E -07 

3 . 12047 E -07 

7 . 41912 E -07 

3 . 8 fl 364 E -07 

7 .!) 449 fcE -07 

4.69053E-O7 

а. 29 J 40 E-C 7 

5 . 54342 E -07 

8 . 764 a 9 E -07 

б. 44464E-07 
9.2597CE-07 

7 . 39651 E -07 
9 . 77 r 96 t-Q 7 

8 . 4014 CE -07 

1 . 03197 E -06 

9.46162E-07 

1 . 0 S 846 E -06 

1 .C 579 SE -06 

Ul-tlZZF-Jb 

I I r. f •> >■ 


TIME 


THE TAB 


PH 10 


THETAS 


ANGLE 

15.70P500 

iZ.7317lE-0A 

-4.07B92E-03 

-2-25450e-0'i 

. RATES 


1.70018E-04 

-2.59827E-0A 

3.42675E-05 

_ ANGLE 

. 15.002500 

2.90019E-04 

-A.10490B-03 

-2. 221236-04 

.. RATES 


1.6O936E-0A 

-2.59027E-O4 

3.23L60L-05 

ANGLE 

15.9025U0 

3.06554E-04 

-A.130ddF-03 

-2. 19003L-04 

«ATlS 


1.63773E-04 

-2.59027E-O4 

3.01170E— 35 

ANGLE 

16.002500 

3-2276’ie-OA 

-4.156B7E-03 

-2. 16114E-04 

„ - RATES 


1.60527E-04 

-2.59027E-O4 

2. 77l4lf.‘05 

ANGLE 

IG.10?500 

. 3.3{:tiSSE-G4 

-4.102056-03 

-2. 13472E-Q4 

„ RATES 


. 1.57201E-04 

-2.‘>902tiL-0'» 

2.51541E-05 

ANGLE 

. 16.2 )?hOQ 

3.542'05t-04 

-4.2Ctttt3E-03 

-2.11093E-04 

. rates 


l.53794T>04 

-2.59U26E-04 

2.2A359E-05 

ANGLE. 

.. 16.302500 

3.094101-04 

-'J.23A32E-03 

-2. 0d-J83F-0A 

. -RATES 


I.50i j7F-04 

-2.59B26E-04 

U97603L-05 

, ...angle. 


3.8426?E-04 

-4.2O0B0E-03 

-2.071466-04 

...RATES 


1.<*d7ADE-0A 

-2.59026H-O4 

1. 7029AE-05 

Z. ANGIE 

_.16.5v2 500. 

Z' 3.9U7SAE-0A 

-4.2067aE-O3 

-2.055BGfc-OA 

... KATES 


1,430V^E-0A 

-2.59B26E-04 

1.43A44E-05 

._. .ANGLE 

.,_16.6J2500- 

. _ . 4* l2B77t-04 

-4.312 76F-03 

-2.0A273F-04 

_ . RATES 


1.3937CE-04 

-2.59B26E-04 

1.L70&3E-35 

I - ANCLE 

.1 16.702500 

4»26624E-04 

-4.338756-03 

-2.03227E-04 

RATES 


1.365 68E-04 

-2.590256-04 

9. 31A64L-06 

... ANGLE- 

16.0OP5OO 

A.3«J9a7E-0A 

-4. 364731-03 

-2.02^l0C-34 

. RATES 


. l,3l66«F-0<» 

-2.590256-04 

7.06635E-05 

angle 

. 16.Tf;>2500 

A.52958F-0A 

-4.39071E-03 

“2.0l«06E-04 

RATES 

- 

, 1.277T3E-04 

-2.59025F-O4 

5.0554JE-06 

ANGLE 


. 4.65530E-04 

-4.4L669E-03 

-2.01389E-04 

RATES 


1.23703E-04 

-2. 590256-04 

3. 322C9b-06 

A JGIE 

17.102500 

. 4.77695L-04 

-4.442ortE-03 

-2.0! liJh-3% 

R \TES 


1.19O00L-04 

-2.59025L-O4 

1.9J2 I5t-0b 

ANGl F 

1 7. P 07 500 

4.89446E-04 

-03 

- 2.IJ.I 





PHIS 

1. 70S6/£-0‘i 
5.53040E-Q5 

l.7o50Jt-04 

;>.68624E-03 

l.fl2240r-04 

5.7<^241E-05 

l.b308St-04 

5.a987i>fc-0& 

1.94037f-04 

•6.00S13E-05 

•2.0CiJ'J6t-04 

t>.lU37£-05 

•2.06260 F-Q4 
6.217J2L- 05 

2. 12530E-04 
•5.32283e-05. 

•2. 18906C-04 
•6.42776F-05 

•2.253d5E-04 

•6.53194E-05 

•2.31969E-04 

■6.63523C-05 

•2.386 56E-04 
•6.73747E-05 

-2.45444E-04 

•6.83a5u£“05 

•2.52332F-04 
•6.93d 17E-05 

•2.59U9E-04 
•7.03d 32E-05 

' P • (rU t ■" 0 


THETAP 

-A*3S927£-J4 

-6.l2aUE-Q6 

-4 . 2'>*iE^06 

-4.3/B13t,-34 

-2.7&924E-06* 

*4.3BOOBl“04 

-I.D4992t-C:6 

-4-,3B026£-04 

6.917feiL--G7 

-4.37Bt>gt-04 
2 .4524s>L-w6 

“4*37535E-04 

4.22B73t-a6 

-4-37G22E-04 
6.01 7D*-iL“C6 

-4 . 36 3 30t"Q4 
7*8L3‘JaE**U6 

-4*i5459K-‘04 

9.6L596t-*06 

-4.34407E-04 
!• L 4 VjuL-05 

-4,33l75E-04 

1.32216C-05 

-4^31762E-04 

1.5C18SE-05 

>4.30 171E-04 
l.b80B3L>ub 

-4.284011-04 

l.Bbb72E-05 

'4.Po4^4t 04 


PHIP 

-1.93175E-03 

-2.196Q3E-04 

-1.75361b-03 
-2. 176bBE-04 

-i.9752ai:-33 

-2.1672bt^04 

-1.9V6T6F-03 

>2.137106-04 

-2.01QO2E-03 

-2.U640E-04 

-2.Q390ft£-03 

-2.09612E-04 

-2.C6992E-03 

-2.07320E-04 

-2.083546-03 

-2.05C62E-04 

-2.100931-03 

-2.02731E-04 

-2.12139L-03 

-2.CCi24E-04 

-2.14099E-03 

-1.97d35L'04 

-2.16065H-33 

-I.95259E-04 

-2.1BC04E-03 

-1.925B4E-04 

-2. 19916E-03 
-l.8982Uh-04 

-2.21900L-03 

-1.069461-04 

-2.2 ib6Sf-G3 


THETAE 

-4.37796E-04 

-6.299S6E-06 

-4.33 J42L-04 

-4.51906E-06 

-4.36710L-O4 

-2.90051E-06 

-4.309226-34 

-1.17143E-G6 

-4.33951E-04 

5.fltJaC7E-07 

-4.39803L-D4 

2.36065t-O6 

-4.304 766-04 
4.io443E-06 

-4.379fa7E-a4 

5.972441-06 

-4.37291E-04 

7.730916-06 

-4.364UE-04 

9.6l0l2fc-06 

-4.3535fl£-04 

I.I4324L-05 

-4.34124E-04 

1.32521E-06 

-4.32708E-04 

1.50660E-05 

-4.31U1E-04 

l*607O9t-i)5 

-4.29334E-04 
1. 066376-05 

-4.273701-04 


PHifc 

-1.299706-06 

-1.27134E-J6 

-1.4331CE-06 

-1.33651F-06 

-l.5o7UC-06 

-1.40362E-06 

-1.710936-06 

-1.472641-06 

-U06172L-O6 

-U54312E-06 

-2.019646-06 

-1.6152IF-06 

-2* L8404L-C6 
-1.603646-06 

-2.36746E-06 
-I. 76323E-06 

-2.53756E-06 

-l.83ablE-06 

J 

-2.72527E-06 
-1.915 ldE-06 

-2. 72064E-06 
-1.99216E-06 

-3.12374E-06 

-2.06955E-C6 

-3. 33450E-O6 
-2.14710E-O6 

-3.553l9.t-Q6 

-2.22406E-O6 

-3.77957E-06 
-2. 30241L-Q6 

- n j k 





U 


i 



{ 


I 

i 

I 





PHIS THETAP PHIP THETAE PHIE — 

2.r35a4E-D4 -2.2S470E-03 --V, 25246E-04 -4.255A9E~06 

7.227WE-05 2.2l0^lE-0b -1.0aB56E-0^ 2.22032E-05 -2,456^9E-06 

2.03S58E-04 -<i^.22C3/»E-0A -2.27271E-03 -'<.229391.-0<V 5049f.E- 

7.32005E-05 2-3a3/9E-05 -1.77628E-04 2.39'*SSE-05 -2.V3273B-06 I 

u 

2.882231-04 -4.19S64E-04 -2.290il£-03 -4.20458E-04 -4 , 7t»202E-06 

•7.41053E-U5 2.5553DE-05 -1.74288E-04 2.58673E-05 -2.60826L-06 

2.95673E-04 -4.ti924t-04 -2.30756E-03 -4.17806E-04 -5.02o59t-06 

T.49873E-33 2.724BIE-05 -1.70769t-04 2./J6 72E-05 -2. t.a297E-C6 

3.03220E-04 -4.l4Ui>E-04 -2.32445E-03 -4.14985E-04 -5.29858E-06 

7.58452E-05 2.89224E-05 -1.07124E-04 2.90444E-05 -2. 76677E-C6 

•3.10846E-04 -4 . 1 1 140E—J 4 -2.34J98E-03 -4,ll99Bt-04 -5. ‘j7790E-a6 

7.66778F-05 3.067S3£-o5 -1.63326L-04 3.069a3t-05 -2. H29S 7t-08 

3.I05O4E-O4 -4.08001t-04 -2.357UE-03 -4. i84 7E-04 -5.8644&E-C6 1 

7.74843E-05 3.22C64t-05 -I.S9367L-04 3.232tt7£-05 -2.90l31t-06 1 

. , , . r 

3.26342E-04 -4.047C0t-24 -2-37284L-03 -4.05S3'tE-04 -i». 1531 lE-06 i 

7.a26'tOE-05 3.38l5aL-J5 -1.55238E-04 3.3J357E-05 -2.97195E-06 | 

3.34206F-04 -4.01 239E-04 -2.38Bl5t-03 -4.02361E-04 -a,45878C-0t 

7.901£.3E-!)5 3.54039E-05 -1.50931E-04 3.55198E-05 -3.04145E-06 

3.42144E-04 -3.97620E-U4 -2.4J302E-J3 -3.98431E-04 -t>. 76t35£-0t i~ 

-7.974UE-05 3.69714E-C5 -1.46437E-04 3. 70818E-05 -3. l09«CE-0t> 

3.501531-04 -3.938450-34 -2.4l7t3E-03 -3.94645E-04 -/.080o9t-C6 

8.043841-05 3.85192E-05 -1.41746E-04 3-8b227E-05 -3. 1 76981-06 j 

3.582301-04 -3.89918E-04 -2.431361-03 -3.90707E-04 -7.401891-06 I 

0.110841-05 4-0D483E-O5 -1.36B4BE-04 4. 014381-05 -3.24301E-C6 l- 

3.66373F-04 -3. 858371-04 -2.444791-03 -3.85618E-04 -7.72923E-06 t 

8.175171-05 4.15603E-Q5 -1.31731E-04 4. -.64671-05 -3.307901-36 § 

a 

3*74579i:-0^ -‘3aai6C7t^04 -2 .45770E1-C)3 -363Z379E“0^ *i.C6321E-Q6 jl 

fi.236a^E-05 ^.3Db60E-05 -U2o3bAE-04 4.31330t“0$ “3.3716aE^0b H 

-3.7T227L-0^ -2.4700<jL- 03 '-3*77992E^0^ -3,^»03bl [— Oo 

5 * 29 t,lOE-Db *l. 30743 L -04 ^ 7 E '-05 • 3 .^ 343 ^^^— Of> j 


^ . 'M : ri 


- \ . ryjr.^i ~..u 


-7 ill ^ i 


^ \ f i «. »,,j 7 - 


^ r 1. 1 t ( ■ « ■ 7 



TIME 

THE TAB 

pHia 

THETAS 

ANGI.C: 

Ifl. 902500 

,6.201 BAE-O-t 

• -4.91036E-03 

-l.dlb02£-04 

RATES 


3.636S1E-05 

-2.59821E-04 

3.631646-05 

ANGLE 

19.002500 

6.23S2SE-3A 

-4.93S34E-03 

-1.777d0E-04 

. — RATES. 

— ■ 

3.1A7/AE-05 

-2.59821E-04 

4.006716-05 

ANGLE 

19.102500 . 

6.26A30E-0A 

-4.962 32E-03 

-1.7358iF-04 

. RATiS 


2.669a0E-05 

-2.59820E-04 

4.371806-05 

ANGLE 

19.2J2500 

6.2aaASE-04 

-4.9Q3J0E-03 

-1.69J37L-04 

. RATES 


2.1/2J1E-0S 

-2.59d20E-04 

4. 721936-05 

ANGLE 

19.002 500 

6.3G77AE-0A 

-5.0l42bE-03 

-1.6^l5CE-04 

RATES 

— 

1.6U667E-0S 

-2.59d20F-04 

5.05232E-05 

ANGLE „ 

-19.402500 

6.322I0E-0A 

-5.0402/E-03 

-1.589426-04 

rates 

- 

1.203 JBE-05 

-2.59820E-04 

5.35d52E-05 

ANGiE 

~^19.502 500 

6. J31HIE-0A 

-5.06625E-03 

-1.5J443E-04 

RATES. 

..... 

7.2202A6-06 

-2.59d20E-04 

5.6364311-05 

ANGLE 

. 19.502500- 

6.3366<.E-04 

-5.09?23t-03 

-1.47681F-04 

.. RATtS 


2.Ajy£.2E-06 

-2.59dl9E-04 

5.88239E-05 

ANGLE 

19./02500 

6.33671E-04 

-5.11821E-03 

-1.41692E-04 

RAILS 



-2.3066bE-06 

-2.59dl9E-C4 

6* 093216-05 

ANGLE- 

19.fiO?56o 

6.3320AE-OA 

-5.14419E-03 

-1.355UE-04 

RATES 


-7.01y<»lE-06 

-2.59dl9E-04 

6.26626E-05 

ANGI E 

19.902500 

6.3226yE-04 

-5.170186-03 

-1.291 77F-04 

RATES 


-1.16797E-0S 

-2.593196-04 

6. 199476-05 

AN(.LE 

20.JJ2500 

6.30a70e-OA 

-5.l96lbE-03 

-1.227316-04 

RATES 

* 

-1.629y0E-05 

-2.59dl9E-04 

6.491 39F-05 

ANGLE 

20.102500 

6.290L2E-OA 

-5.22214E-03 

-1. 16214E-04 

RATES 


-2.0B687E-05 

-2.59dlbE-04 

6.541 19L-35 

angle 

20.2)2500 

6.2u69yE-06 

-5.24B12E-03 

-1.09669E-04 

RATES 


-2.53ij09E-05 

-2.5981BE-04 

6.54d/lE-05 

ngle 

20.502500 

6.2i937E-0A 

-5.27410E-03 

-1.031 idL-04 

w ATES 


-2.9BA /ar-05 

-2.59ttl8E-J4 

6.5l439f -05 

ASM F 

20.4 )2S00 

6.207 -04 

• ♦ -»i • t 1 .->1 

- 5 • 3 W 5J <jf*i r - 1) ) 

-9.6 r.il5f-.)5 

t * . * 


PHIS 

THETAP 

PHIP 

THE T At 

P!U 6 

-3. 995506-04 
-8.407346-05 

-3.6a02toC-04 
4. 746816-05 

-2.49303E-03 

-1.088206-04 

-J.6B780E-0A 

A.7bl2<*E-05 

-9.10265E-06 

-3.55660E-06 

-4.079d3L-04 

-6.45960E-05 

-3.632076-04 

4.891896-05 

-2.50359E-03 

-1.024056-04 

-J.6i957C-0A 

<f.B752AE-35 

-9.45129C-06 

-3.616226-06 

-4. 16468E-04 
-8.539766-05 

-3.5U2436-U4 

5.036286-05 

-2.51350E-03 

-9.56785E-05 

-3.53993E-0A 

5.03Bb0E-03 

-9.82585E-06 

-3.674Bt*E-06 

-4.25JJ26-04 

-8.55792F-a5 

-3.53 134F.-04 
5. 180156-05 

-2.52272E-0J 

-8.861936-05 

-3.53aaOE-3A 

5.1B15U-05 

-1.01962E-05 
-3. 732606-06 

-4.33583E-04 
-8.604 166-05 

-3.47883E-U4 

5.323666-05 

-2.53121E-b3 

-8.120296-05 

-3.43623E-0V 

5.32A15E-05 

-i. 057236-05 
-3.789396-06 

-4. 422096-04 
-0. 648556-05 

-3. 424876-04 
5.466 9oE-05 

-2.53894E-03 

-7.3H020f-05 

-3.A3232E-09 
5.4S6b9£ -OS 

-1.095416-05 

-3.84527E-06 

-4.508 796-04 
-6.691146-05 

-3.369496-04 

5.61C176-05 

-2.54587E-03 

-6.518636-05 

-3. 769*1 -OV 
5.6J92aL-0S 

-1.13413E-05 

-3.90022E-06 

-4.595906-34 
-8. 731976-05 

-3.312876-04 
5. 753406-05 

-2.55196E-03 

-5.852126-05 

-3.3201*fc-0A 

5.75202L-OS 

-1.17341E-05 

-3.95424E-ii6 

-4.68342E-04 
-8.771 .36-05 

-3. 254426-04 
5.896736-05 

-2.55715E-03 

-4.736816-05 

-3.26190E-0A 

5.a9501t-05 

-1.21321E-05 

-4.00729C-J6 

-4. 771316-04 
-d.80d31E-05 

-J. 194746-04 
6.040206-05 

-2.561416-03 

-3.768326-05 

-3.23224E-0* 

6.03B32E-0S 

-1.253556-05 
-4. 059336-06 

-4.859586-04 

-0.B4378F-O5 

-3.133626-04 

6.ld334F.-05 

-2.56467F-03 

-2.74lt>66-05 

-3.1AI lAE-0* 
6.lai9ab-0S 

-1.29439E-05 

-4.11030E-06 

-4.948186-04 

-8.87740F.-05 

-3.07 lOoE-b4 
6.327636-05 

-2.56687E-0J 

-1.651286-05 

-3.07863fc-0A 
6. 32597E-05 

-1.3J575E-U5 
-4. 160136-06 

-5.037116-04 

-8.939J9F-05 

-3.0D7066-L4 

6.47155E-05 

-2.567946-03 

-4.90731E-06 

-3.01A61E-0* 

6.*7027fc-05 

-1.37759E-0 i 
-4.20d73C-06 

-5.126356-04 

-8.938796-05 

-2.94163E-04 
6.61 5526-05 

-2.56782E-03 

7.472426-06 

-2.9*919E-0* 

b.bl‘«79£-0S 

-1.419926-0*1 

-4.25d01E-JTj 

-5.215)36-04 

-8.95ii4lF-J5 

-2.87475.-04 

6.759426-05 

-2. 566416-03 
2.0/0946-05 

-2.BB232L-0* 
b. 7'j9**t-05 

- 1.462716-0 ; 

- t* 3 0184L-0 6 

-5.334<»7f-J4 

-2.8 J644i -04 

-2.5o 5611 -03 

-2.!IIAJUI -3* 

•1 . -iV* 


» . » 


TIME 


THETAB 


PH IB 


THcTAS 



ANCLE 

?0*502SOO 

*is.l7Gd9E-0A 

-S*3260?L-03 

-9.02303E-05 


RATES 


-3.d595aE-05 

-2*598ibE-04 

6. 325J5L-J5 


ANGIE 

?0.60?500 

6.13016E-04 

-5.3b20SC-03 

-8.403111-05 


RATES 


-/f.2B7T7E-05 

-2.5981BE-04 

6.17467E-05 


ANu' E 


6.0bSl7P-0A 

-5.37du3E-03 

-7.79501L-35 


RAILS 


-4. 709:j9t-0b 

-2.b9BUE-04 

5.99J2JL-0:> 


ANGLE 

20.rtG2S00 

6.03bC0£-0^ 

-!>.4040lE-03 

-7.236911-35 


RATLS 


-5.12^9UE-01> 

-2,59dl/E-04 

5. 77534L-35 


ANGLE 

?0.*=iJ2*>00 . 

5.9B270E-04 

-5.42999E-03 

-o. 64 1. 63fc -05 

- 

RATES 

. • 

-5.533bCE-05 

-2.59dl7E-04 

5.53393E-05 


ANGLE 

21 .OJ2SQO 

5.92b3bh-04 

-5.4S396E-03 

-6. l0l64k-35 


HATES 


-5.9J5ABT-D5 

-2.59dl/E-0^ 

5.27323L-35 


ANGt E 

21 .2S00 

5.36^03E-0^ 

-5.4B196F-03 

-5.588921-05 


rates 


-6.33Jt>7E-0S 

-2.59ttl7t-0A 

4.98d3lE-35 


angle 

~2l.2J2 500 ^ 

5. 7987dE-04 

-S.507‘i4E-03 

-5.134971 -35 


RATES 


-6.71377E-05 

-2.1>9817E-04 

4.69451L-35 


ANCLE 

21.312S00 

5.72969E-CA 

-S.53392E-33 

-4.65390F-05 


RATES 

- - 

-7.10001E-05 

-2.U981TE-34 

4.39234E-05 


angle * 

2l,A02S00 

3.6S»OblE-04 

-5.5:>99GE-03 

-4.22717E-35 


rates 


-7.A7^25L-05 

-2.59817E-Q4 

4.0H745L-05 


angle 

2U‘>J250G 

5.!>002^E-04 

-S.Sd588E-03 

-3.83383E-05 


KATES 


-7.bAl4!>E-D5 

-2.59817E-04 

3. 78497b- a5 

^ * 

ANGLE 

21.O32S00 

5.aO0O2E-OA 

-5.61187E-03 

-3.470ilC-05 


RATES 


-8.201SSE-05 

-2.598I7E-04 

3.49301F-05 


ANGLE 

21./32500 

5.<>l62'»E-04 

-5.63785E-03 

-3. 13566L-35 


RATES 


-a.5t>A53E-05 

-2.S9817E-34 

3.20752E-05 


ANGLE 

2l.80250d~ 

5. 34£^896E-J<» 

-5.CIO383E-03 

-2.82d4it-05 


RATES 


-B.9003‘tE-OS 

-2.b98 WE-04 

2.94225E-C5 


ANC.LE 

2l.'^'>7t>C0 

5.23B27H-0^ 

-S.6398IE-03 

-2. 546 jJL-05 


» AIES 


-9.23J92E-0& 

-2*S9dr/E-04 

2.6 id57f -J5 


AM,! f 

2 / .11 

S. 1 -04 

71 / r - 0 1 












PHIS 

THt TAP 

PHIP 

•HFTAE 

PH 10 J 

-5.39571E-04 

-2.73669E-64 

-2.55939E-03 

-2. 74423F-04 

-1.549620-05 1 

-9.0l5l8t-05 

7.04645E-05 

5.01480L-05 

7.048500-05 

-4. J8868:£-06 S 

y 

'5.48597L-04 

-2.6;>55lL-04 

-2.55356L-03 

-2.673030-04 

-1.57371E-05. i 

-9.03619E-35 

7.ld92UE-05 

6.65832E-05 

7. 192520-05 

-4.42940E-06 i 

-5.57642^-04 

-2.59291E-04 

-2.546020-03 

-2. 600390-04 

1 

-1.63820E-05 * 

-9. 05490r-05 

7.iill6fc-U5 

8.43-t 750-05 

7.33589E-05 

-4.4o8Ue-06 f 

■ 5 . 667 OSH - 0 4 

-2.5l8d9L-04 

-2.5366 lL-03 

-2.526310-04 

-1.63307S-35 \ 

-9.U7127L-05 

7.47206E-05 

1.03607E-34 

7.47833E-05 

-4. 5046 70-36 

-5. 757d3r-04 

-2 .4« 3^ /L-J 4 

-2.52523i-33 

-2.45C82E-04 

-1. 728280-05 \ 

-9.u8530:-05 

7.61 162L-U5 

1.24553E-04 

7.61957E-05 

-4.53889E-06 j 

-5.84B75f-04 

-2 • 3666oE-J4 

-2. 511640-03 

-2. 37393E-34 

-1.773830-05 

-9.09700E-05 

7.74956E-C5 

1.474090-34 

7.759260-05 

-4.570M0-06 

-5.919 7bt-04 

-2.2H849E-04 

-2.495661-03 

-2.29564E-04 

-1.81968E-05 j 

-9.10640E-05 

7.«a555t-05 

1.724350-04 

7.897090-05 

-4.59965E-06 1 

-6.033d6L-04 

-2.208960-04 

-2.477360-33 

-2.215990-04 

-1.86581E-0S 1 

-9.11356E-05 

8.01923L-05 

L.99932L-04 

8. 032 700-05 

-4.625830-06 

-6. 12232E-04 

-2.128UE-04 

-2.455570-03 

-2. 135OJ0-O4 

-1.91219E-05 

-9. 118521 -05 

a.l504lt-05 

2.3025OE-04 

8.165730-05 

J-4.64896E-06 

-6.2l322£-34 

-2.04596E-04 

-2.43089E-33 

-2.052690-04 

-1.453780-05 

-9.12137E-05 

d.27360E-J5 

2.638240-04 

8.29582E-05 

-4.66886E-06 •— 

-6.30444E-04 

-1. 952550-04 

-2.4i;266E-33 

-1.969090-04 

-2.00555E-05 

-9.12216E-35 

8.4DJ52E-05 

3.011270-04 

8.42261E-05 

-4.68532E-06 

-6.395651-04 

-I.H7791E-04 

-2.37050E-03 

-1.884250-04 

-2.052470-05 

-9. 12099E-05 

8.524841-05 

3.42743E-04 

8.545740-05 

-4.69815E-06 - 

-6.4d6d5E-34 

-1.7920n-34 

-2.333930-03 

-1. 79B20t-04 

-2.099500-05 \ 

-9. U791E-05 

8.64222L-05 

3.6 i3c0t-04 

8.r N487E-05 

-4.707I00-G6 

-6.57800E-04 

-1.70506L-J4 

-2.292410-03 

-1.710970-04 

-2.14O59E-05 ! 

-9. 11293C-C5 

8. 75 5J7h-65 

4.417860-04 

8.779660-05 

-4.711950-Ob i; 

V. 

-6.O6910E-34 

-1.6i69HL-J4 

-2.245290-03 

-1.622620-04 

-2.193710-05 j 

-9.1 3625E-05 

8.H6399L-05 

5. 010130-04 

8.88S31E-05 

-4.71242E-C6 

-f» . 76 7 1 r *• )4 

- I .52 7 ! U *,4 

1 iM 

- 1 - % V > *.)l -04 






JO . - 



T [ ME 

thetab 

PHia 

THE TAS 

_ ANGLE 

.. rates 

22,102500 

j5.04689E“Q4 

-9.8y418E*-05 

"5.74i77E-03 

-2.59817E-04 

-2-.04927F-05 

2.29146C-05 

.angle 

- RATES 

22,202500 

A..9A636E-DA 

-1.02107E-04 

-5.7t.776E-03 

-2.59Bl7E-0<i 

-l.a2016E-05 

2.L3524E-05 

.. A^lCLE 
RATES 

?2.3J2500 

4.8A270E-0* 

-1»05197E-OA 

-5. 7937'VE-03 
-2.59817E'Q4 

-1.620SU-05 

2.0143aB-05 

, ANGLE 
_ RATES 

22,^t02500 . - 

A.73599E-0A 

-l»0B2L0E-04 

-5»81972E-03 

-2«!>98l7E-04 

-1.42392C-35 

1.93107L-0S 

.. ANGLE 
--.RATES 

22*502500 

4.62631E-04 

-i.lllAOE-04 

-5.0457aF-03 

-2.59ai7E-(}4 

-1.23332E-05 

l.Bb679E-0b 

ANGLE 

- RATES 

_.22.o0-J'>0Q . . . 

.4*5l373B-04 
. -1.14002E-04 

-5.87LO0E-03 

-2.59BI7B-04 

-1.04bl7E-0S 

l.aa240fc-05 

. ANGlE 
. RATES. 

22*/a2500 

- 4.3yd33E-'04 
-l*l677ae-04 

-5.a9766E-03 

-2.598ldE-04 

-8.55450E-06 

1.91dl6E-Q5 

ANGLE- 

_ ..KATES. 

-.122.302500 

. 4.2tt020E*-04 
-^l.l94 70fc^04 

-5.'J2Jo5E-03 

-2.59aiaE~04 

— 6.601 73 E"’06 
1.99366B--05 

- angle 

— RATES 

22.90250a- 

4.15943E-04 

“I.22077E-04 

-5.94963B-03 

-2.598iaif*04 

^-4* 5510LE-06 
2. 107711-05 

angle 

... RATES 

. 23.002 500 

4*03609E^Q4 

rl.24597E-04 

-5.97561t^03 

^2*598L9E-04 

-2. 36769E-06 
2.25a69fc-05 

_.. angle 

RATES 

. 20*102500 

3*9I02aE-04 

-L.77026t-04 

•*6*00159E-03 
-^2.598 L9f-04 

-1.60349E-QS 

2*44434t-05 

angle 

RATES. 

-23*207500 - 

3.7020dE-04 

--l*2y364£-04 

-6*02757E"0i 

-2.59820E-U4 

2.53719t-06 

2.66ia4£-05 

ANGLE 
. RATES 

23.302500 - - 

3.&5I60E-04 

-1.31606E-04 

«6.0535£»E'03 

^2.59aZlb-04 

5.32212E-05 

2*907096-05 

angle 

. RATES 

2^3.402500. 

3.5ia92E-04 

“T.33750B-04 

-b.07954e-03 

-2.59a2lE-04 

B. 36541E-06 
3. 17369F-05 

angle 

RA'ES 

23*502500 

3.334I4B-04 

“l*35r93B-04 

^6.IC552e-03 

-2*59a22t-04 

I.l6d7ifc-G5 

3*4706U,-05 

1 AN F 

i' ^ 

2 t.h075DO 

3.24?36h-J4 

-ij.l ^l5uL-Ji 

1.511 05r-05 


:;’.=3-r=^ ' 

- 

rz 



PHIS 

THETAP 

P,H I P 

THETAE 

PHfE 

-6.351056-04 

’-9.-08743E-05 

-L.43765E-D4 

9.066i)0E-0S 

-2.13131E-03 
fa.94443t -04 

-1 .44274E-04 
9.09503fc-05 

-2.2a7/jbE-05 

-4.69d96E-06 

-6.94186E-04 

-9.07536E-05 

-1.3V65L£-a4 

y.i60iJr-05 

-2.D52^0E-03 

7.3L575E-04 

-1.35132E-04 
y- 189 d7E-D5 

-2.334/BE-05 

-4.6a429E-06 

-7.03255E-04 

-9*06l49fc-05 

-1 .25'i'tGE-04 
9.2'>312C*-C5 

-1 .9a455E-03 
8. J13'i5L-04 

-1.25097E-04 

9.27861E-05 

-2.30132E-C5 

-4.66J71E-06 

-7.12309B-04 

-9.045d2E-05 

-l.lAlb7fc-04 
9.: »0blE-C5 

-1.89583L-03 

9.45b02L-04 

-1. 1657tiE-04 
9.36172E-05 

-2.42B03E-05 

-4.63673E-C6 

-7.21J46E-04 

-9.026446-05 

-1.0£i7a7E-(j4 

9.4J712E-05 

-1.79483L-03 

1.07724E-33 

.-1.07178E-04 

9.43B06E-O5 

-2.47424E-05 

-4.60275E-06 

-7.30355L-04 
-9.00 J55E-05 

-9.734‘i'tr-05 
9.'.f 787E-01) 

-1.67973E-03 

1.220OU-O3 

-9.77005E-05 

9.50994fc-Q5 

-2.520G6E-05 

-4.56il0t-O6 

-7.39364L-04 

-8-939546-05 

-U.7a J3uE-(ji> 
9.5427QE-05 

-1.548V9L-0J 

l.4D03St-03 

-8.P1577E-05 
9. 57490E-05 

-2.56543E-05 

-4.511516-06 

-7.4U344E-04 

-3.96917E-05 

-7.a261CE“GS 

'J.G0U>9E-oS 

-I ,39Ba6E-b3 
I.5y5d5£-01. 

-7.85529F-05 

9.63371E-05 

-2* 6LD26E-05 
-4.45339E ‘06 

-7.573J4B-04 

-8.950a2E-05 

-6,as329L-u5 
9 4E — 05 

-1.228 JJE-Q3 
:.8L4b5E-03 

-6.88929E-05 

9.68639E-05 

-2,^654466-05 
-4* 386906-06 

-7.66248C-04 

-a*93656E-05 

-5,a'}5't9L-05 
9 . 70it2E-u5 

-1.03988L-03 

2.0542GE-03 

-5.91832E-05 
9- 73300E-05 

-2»69797E-05 

-4.3L32LE-06 

-7.75l3lt-04 

-a.93OB0C"O5 

-4.9232t.F-05 

9.7ii290E-(J5 

-8. 16741E-Q4 
2.308191-03 

-4.94299E-05 

9.77363E-05 

-2. 740706-05 
-4,23432C‘*06 

-7.fl4117E-04 

-3.93J94E-Q5 

-3.9't719L-05 

9.77849E-05 

-5.73090E-04 

2.58429E-0J 

-3.9(i30yb-O5 

9.80a42E-05 

-2.78264E-05 
-4. 1542 £6-06 

-7.930 72B-04 
-0.971o2t“05 

-2.967a4E-05 
9.a0 854E-t)5 

-3.. 660E-04 

2.003998-03 

-2.98159E-05 

9..'.37S0fc-O5 

-2.B2381E-G5 

-4^079076-06 

-8.020756-04 

-9.CJ457E-05 

-1. 985758-05 
9.8332CE-0S 

-1.A3Q4QE-05 

3.00316E-0J 

-L.99665E-05 

9.8i>U>8E-05 

-2.86429E-05 

-4.016386-06 

-a. 1U56B-04 
-9. l“,5396-05 

-l.ODl^OL-OS 

9.iJ5264t-L5 

2.93539L-04 

3.13yQ8E-03 

-1.00958E-C5 
9.87932t 05 

-2.904216-05 

-3.97325t-06 


-1 -i3'_.7o' -o7 

o. -O'l 

-07 







TIME 

THETAO 

PHia 

THETAS 


ANGLfe 

?3. 707500 

#S.loa71£-04 

-6.lb7^9£-03 

1.92475E-05 


PATFS 


-l.3'3Sfa5E-0A 

-2.59824E-04 

4. 09747E-05 


angle 

?i.d07500 

2.96027E-04 

-6. ld3A7E-03 

2.35070E-05 


RATES 


-I.4l2tt7E-04 

-2.59d2!»E-0A 

4.42267E-05 


ANGLE 

23. <#02500 

2.82617E-'04 

-6.20945E-03 

2.8J930E-05 


RATLS 


-i.'fzaiAE-o** 

-2.59325E-04 

4. 74835E-05 


angle 

?<•. 002500 

2.6B252E-0A 

-6.23593E-03 

3. 3C034E-05 


RATES 

- 

-1.44389t-04 

-2.S982&E-09 

5.07J79E-05 


ANGLE 

2<V. 102500 

2.53743E-04 

-6.P61A2E-03 

3.32315E-35 

— 

«ATES . 


-1.45764E-04 

-2.59826E-04 

5.38J32E-05 


ANGLE 

.2A.^l)?5Q0 

2.39103E-04 

-6.2879DE-33 

4. 37t>53E-05 


RAIES^ 


-l.^70l6E-OA 

-2.59827E-04 

5-O8190E-05 


ANGl E 

?'».302SOO 

2.2^344E-04 

-6.31338E-03 

9.95879E-05 


RATES 

- 

'l.4ai'#5’.-0A 

-2.S9a27E-0A 

5.96023L-05 


ANGLE 

2^. tv)2 500 

2.0'i‘* 78E-0A 

-6.33936t-03 

5.367 78F-05 


RAILS 



-2.59827L-0A 

6.21527L-35 


ANGLE 

?^.Si)?500 

i.')A!>HE-04 

-6.36535E-03 

6.20391L-35 


RA "ES . 


-l.500l'7E-04 

-2.59327E-0A 

6.99235L-35 


angle 

2A. 60^500 

1.79-V7QE-0A 

-6-391 33E-D 3 

6.a55?3F-05 


rates 


-1.50762E-0'* 

-2.b9B27E-09 

6.63/73F-05 


ANGLE 

2A.TJ2500 

1.6'*3716-0A 

-6.A1731E-03 

7.52729E-05 


RAtrs 

— 

-U51372C-04 

-2.S982at-04 

6.79812L-05 


ANGLE 

?A.‘< 32H00 

*UA92J9E-3A 

-6.AA329E-03 

d.2l356C-05 

— - 

RATES 

* 

-T.519A8E-04 

-2.b9a20e-3^ 

6.92J73E-05 


ANGLE 

24.^^02500 

1.3AaC6E-0A 

-u.'»692dE-03 

a.910llL-0S 


RATES 


-l.S21tt9E-0A 

-2.bva28E-0A 

7.00355E-05 


ANGLE 

25.002500 

1.IU776L-0A 

-6.99S26E-33 

9.61287.E-05 


RATES 


-1.52395E-0A 

-2.a9a23E-0<* 

7. 099b9E-05 


A‘ GLE 

25.1 J2500 

1 .033JIL-0A 

-o. 521291 -03 

1.0 U /OL-09 


RATES 


- 1 . ‘>2A6St -0*t 

-2.59U28E-09 

7.393691-05 


ANGIE 

12500 


-o. ‘>V 7t3F-03 

1. I.J2 011 -39 



PHIS 


THETAP 


PHIP 


THFTAE 


PMIE 


8.29720E-04 

•9.46356F-05 

9.71870E-06 

9.0/683L-C5 

9.28181E-D4 

3.14401L-03 

9.68765E-06 

9.9J08SE-05 

-2.98347E-05 

-3.97161E-06 

8. 39296E-04 
•9.67922E-05 

1 .95985E-C5 
9.88204E-G5 

1.23669E-03 

3.01138F-03 

I. 959036-05 
9. 904641-05 

-3.02337E-05 

-4.01315E-06 

8.49092r-04 

9.9132BE-05 

2.94814E-C5 

9.fl8298fc-u5 

1.52829E-03 

2.81087E-03 

2.94955E-05 

9.904iiE-05 

- 3 . 0 ^ 5 e 0£-05 

-4.076C0E-06 

8.59124E-04 

1.01512E-04 

3.93631L-C5 

9.87993L-05 

1.79755E-03 

2.56994L-03 

3.93977L-05 

9.89960E-05 

-3. 10493E-C5 
-4. 15147E-06 

8.69392E-04 

1.0i81<*fc-G4 

4.924Djt-05 

9.87312E-05 

2.04I73E-03 

2.31329E-03 

4.92935L-05 

9.89134E-05 

-3. 14684E-05 
-4.23170E-C6 

H. 798U2E-04 
i.C59 5at-04 

5.91C82E-05 
9 • do 28 1 £ — 05 

2.2602 7E-03 
2.05987E-03 

5.91792E-05 

9.879616-05 

-3.18956E-05 

-4.31064E-06 

8.905 7TE-04 
1.0790IL-04 

6.89645L-G5 

9.84924L-05 

2.45418L-03 

L.82I91E-03 

6.V05L6E-05 
9. ao468t-05 

-3.23304E-05 

-4.38434E-06 

•9.0l435t-J4 
1. 09626F-04 

7.88057E-05 

9.83263E-05 

2.625361-33 

1.6C584L-03 

7.UJ076E-05 

9.04682E-05 

-3.27722C-05 

-4.45068E-06 

9. 17495E-04 
1. Ill 36F-04 

8.85288E-05 

9.HL32CE-U5 

2.77614L-03 

1.41392E-33 

3.87443E-05 

9.82625L-05 

-J.32203E-05 

-4.5C885E-06 

9.235 76F-04 
1. 12443E-04 

9.B4312E-05 

9.79U4E-05 

2.90893E-03 

1.24583E-0J 

9.8559ifc-05 

9.80323F.-05 

-3.36737E-05 

-4.553B6E-06 

9.34977E-04 
1. 13562L-04 

l.0a210L-04 
9. 76 662L-05 

3.02604E-03 

1.09987L-03 

1.08353E-04 

9.77786E-05 

-3.41318E-05 

-4.60lltt-06 

9.4u3d2E-04 
1 . 145I2G-04 

L.17964L-04 

9.73978L-05 

3. 12956E-03 
9.73/18L-04 

1. L8114E-04 
9.75037E-05 

^59i7E-05 

-4.63639E-06 

9.57875E-04 
1. 153J7E-04 

1.27639E-04 

9.71074L-05 

3.224J3C-03 

0.6^928E-O4 

1.2/850E-04 

9.72086E-05 

-3.50589E-05 

-4.O6525E-06 

9.to9439E-04 
1. 15962E-04 

1.37384E-04 

9.6795BE-05 

3.303JOE-03 

7.7U14E-04 

1.37555E-04 

9 . 6 a 942£-05 

-3.55266E-05 
-4. 680425-06 

9.8U63L-04 
1 . lb489t-04 

1.47048L-04 

9.64OJoE-05 

3. J7594L-03 
6.90I57E-04 

1.47^285-04 

9.65610E-05 

-3.599t‘# 5-05 
-4. 7064b E- O'* 

9.92/ 141-04 

1 .566/71 -C4 

3.4 «nsr-j3 

1. Or.dsff -C4 

- ». f.4o/ ;r-0‘» 




TIME 


THETAii 


PH IB 


THETAS 



AN6tt 

25.302500 

i7.30560E-05 

-6.57321E-03 

1.171616-09 

— 

RATES 


-1.5219BE-09 

-2.59828E-09 

6.91 J6JL-05 

“ 

AMGLE 

25.902500 

5.73519F-05 

-U.59919E-03 

1.290196-09 

— 

RATES 

•• 

-1.518626-09 

-2. 598286-09 

6.78596L-05 


AMi*i E 

25.502500 

9.26S81E-05 

-6.625176-03 

1.307236-09 


RATES 


-1. 513926-39 

-2 . 59828E -09 

6. 6l86l 6-35 


A’JGLE 

25. .>'^2500 

2. 75780f -05 

-6.651165-03 

1.372i>E-39 

-- 

RATES 


. -1.50789E-09 

-2.593286-09 

6.9137JE-05 


A WOLE 

25.7J2500 

... 1. 253936-05 

-6.877196-03 

1. •♦35356-39 


RATES. 


t1.50055E-09 

-2.59828E-09 

6. 179C9C-05 


ANGLE 

.. 25.1102500 

-2.923656-36 

-6.7C312E-03 

1.990 766-09 


RATES 

— • 

-1. 991926-09 

-2.59828E-39 

5.902956-05 


angle 

_ 25.902500 

-1.72999E-05 

-6.729106-03 

1. 553326-09 


RMPS 

— - 

-1.982026-39 

-2.598286-39 

5.609236-05 


ANGLE 

~26. j.l2 50o” 

~~ -3. 206996-05 

-6. 75509E-33 

1.60777E-09 

.... 

RATES 

— 

-1.970876-09 

-2.59828E-09 

5.282066-05 


ANGLE 

..ib. 102500 

f -9.671286-05 

-6. 781076-03 

1.O5893E-09 

.... 

RATES 

— 

.. __-l. 950816-09 

-2.59a286-39 

9.991016-35 


ANGI E 

26.202500 

-6.l23llb-05 

-6. 007^56-03 

1. 706596-09 

- 

RATES 

- 


-2.598286-39 

9.585906-05 

Z ’ 

ANGLE 

_26. 332500 

_ -7.56Jtt0fc-05 

-O.83309E-03 

1.750596-09 


RATTS 

— 

-l.<»J024t-04> 

-2.59323E-09 

9.22I77E-05 

~ 

ANGLE 

26.902500 

-8.9a32eE-0> 

-6. 859026-33 

l.7i397L-39 

— 

RATES 

-- 


-2.59828E-U9 

3.85376t-35 


ANGLE 

_26.5J250Q 

-1 .oaa‘i2E-04 

-0. 085tOt-O3 

I.B2767C-09 

- 

RATES 


. . -l.i97'*5t-0'» 

-2.593286-39 

3.987071-05 


ANGLE 

26.602500 

-l.l77/a£-04 

-6.91098E-03 

1. 863 /3L- 39 


RATES 


-1.379‘«3t-04 

-2.59d2Ht-09 

3. 12686L-05 


A !GLE 

2u. 702503 

-l.Jl*. 7BE-0« 

-6.93697E- 0 3 

1.89J25F.-09 

— 

R^^TES 


-1 .io0-.lE-04 

-2.59828E-09 

2. 77J16L-05 


ANGl 6 

?:». i I/ 530 

-1 .4<>Vii >t-0^ 

-6.96295r -03 

1. M6 iof-59 


PHIS 


THETAP 


PHIP 


T lEfAE 


PHIE 


1. If l9>b-04 

1.01617E-03 

1. W J33t-04 

1.02791E-0J 

1.17470E-0'# 

1.0i9o6E-03 

1 . 

l.05L^0E-03 

I.0^i313£-G3 

1. in-t^C-04 

I.07'»J3E-03 

U).6d4lt-0^ 

1.0a6^9E-03 

1. I6^42E-04 

l.a98llE-0i 

1. 1096BE- J3 
1. lb3S0C-0^ 

1.121186-33 
1. l'i656E-34 

l.l.i2blE-33 

I. 1 jao0E-0<» 

J. l'»395e-03 
1. l296.<tE*0<f 

I .15519E-33 
1. U96^>E-0> 

1. lt>63^E-03 
1. ICd53h-0^ 

I - I 7 7 5M -0 \ 


I*6b269£-0A 

9.573au-o;> 

U7*j823E-OA 

l.853^7t-0<» 

9.A9291t-J5 

l.9to09E-C4 

9.^‘t9i^E-05 

2.0923bE-0^ 

9.^33C3E-05 

2*I36l^#fc-U4 

9.3;>A34L-05 

2.229^3E-09 
9. 3D29at-Ui 

2.32219t-J4 

9.2^873£-0^ 

2.4lA39E-0^ 

9.19139E-05 

2.t>3600b-04 

9.13073L-05 

2.596S9E-04 

9.08652E-05 

2.6U 732E-04 
d*9VB53L-C5 

2. ^'S9Bt-0A 
633E-05 

2.a6‘>34t-04 

8.8b029E-05 

2.9‘j 39^L-J^ 
8. 7d9bdt-li5 

121 I -3A 


3.50326E-03 

5.595ti8L-0^ 

3.S53SIE-03 

5.3o9li3C-0^ 

3.t»0l85E-33 
A.61 174E-04 

3.6<r*-» llE-03 
4.2l2S5E-0<t 

3.CB^2bE-33 
3.3 .W7E-09 


3.72332E-JJ 

3.558987-39 

3.75753E-U3 

3.290b6E-09 

3.78923E-33 

3.C5601E-09 

3.81873E-33 

2.b9977E-09 

3.89630E-03 

2.66862E-09 

3.872l7E-03 
2. 50955E-39 

3.39O:>5E-03 

2.37001E-09 

3.919626-33 

2.29779E-09 

3.99155E-03 

2.19103E-J9 

3.9o299l-33 

2.69310L-39 

3.9825‘>f-03 


1.669706-* 09 
9.583871-05 

1. 76039F-09 
9.59909E-O5 

1.855596-09 

9.50J92L-05 

1.953916-09 

9.960896-05 

2.09930F-09 

9.9l55ih-05 

2. 138 72L-09 
9. 367826-05 

2. * ’32196-09 
9. 31/536-05 

2.325066-09 

9.269986-05 

2.917926-09 

9.208386-05 

2.509216-09 

9.19906E-05 

2.630396-09 

9.0B622L-05 

2.690926-09 

9.01962L-05 

2.7B077E-09 

8.998986-05 

2.8;j9fl)E-09 
8.8/9 u:>t —05 

2.953296-09 
8. 7 >9586-05 

3. C9S7 7r - Of 


-3.699C2E-U5 
-9. 729256-06 

-3. 791356-05 
-9. 73971E-U6 

-3. 788/16-05 
-9. 7366CE-C6 

-3.036076-05 
-9. 73510E-l»6 

-3.0839OE-O5 

-9.73335E-06 

-3.93067E-05 
-9. 72292E-C6 

-3.97789C-05 

-9.7ll32£-06 

-9.029866-05 

-9.697636-06 

-9.07177E-05 

-^.67998£-06 

i 

-9. I 18966-05 
-9.65857E-0C 

-9. 16993E-C5 
-9.6391 7E-06 

-9.2llliE-05 

-9.6061CE-06 

-9.25709E-35 
-9. 57919E-C6 

-9.302606-C5 

-9.538236-06 

-9. 397796-05 
-9.997906-06 

•..19 2V.I r*i 



ORIGINAL PAGE IS 
OF POOR QUALITXI 



riHE 

THE TAB 

PHIB 

THETAS 

ANGIE 

RATES 

26.902SOO 

-^-58237E-0A 

-1.3l936E-0^ 

-6.98893E-03 

-2.59828E-04 

I.93924E^04 

2*l3^-*3E-05 

_ ftNGLfi 
RATtS 

27.U02500 

-I*7ri67£-0A 

-1.29/42E-0A 

-7.01492E-03 

-2.59d28E-04 

1.9591 3 E-04 
1.8.813E-05 

R AT^S 

27.102SOO 

-l.a^22Tt-0<. 

-1.27A50E-O4 

-7.0409CL-03 

-2.b9828E-0A 

l.97o31E-04 

1.59J81E-35 

ANC.t F 
RATtS 

27.202S00 

-1.‘}6B55E-0^ 

-1.25O06E-O<. 

-7.06638E-03 

-2.598286-04 

1.991C6E-04 
1. 365796-05 

angle 

. RATES 

27.3J2SOQ 

^2.092^2E-0^ 

-1.22630E-0^ 

-7.09286E-03 

-2.59828E-04 

2.00375E'0^ 

l.l7iaaE-05 

__ ANGLE 
. RATES 

27.^J2‘>00 

-2.21379L-04 

-1.20091E-OA 

-7.U885E-03 

-2.598286-04 

2.01471F-04 

1.02335E-05 

ANGLE 
. RATES 

27.‘i02S00. 

-2-33250E-O4 
-1. 17574E-04 

-7.14483E-03 

-2.59828E-04 

2.02435C-04 

9.09829E-05 

_ ANGLE 
RATES- 

i>7. 602500 

-2.45871E-04 

-1.14//8L-04 

-7.17081E-03 

-2.59828E-0^ 

2.0J305F-04 
8. 36355E-06 

_ ANGLE 
RATES 

27*702500^ 

-2.56210E-04 

-T.12008E-04 

-7.19£i79E-03 

-2.59828E-0^ 

2.04125E-04 

8.03367E-06 

ANGLE 
. RATES 

27.^02500 

-2.67269E-04 

-1.09L65E-04 

-7.22278E-03 

-2.S9828E-04 

2.04932E-04 
«. I0595E-06 

ANGLE 
.. RATES 

27.^02500 

-2.73039E-04 

-1.06250E-04 

-7.24876E-03 

-2*lj9a27C-04 

2.05766E-04 

8.S7044E-06 

_ ANGLE 
RATES 

~28.ej250oT 

-2.88515E-04 
. -I.032 66E-04 

-7.27<»746-03 

-2.i>9827F-04 

2.06666L-04 

9.41082E-06 

__ ANGLE 
. rates 

-25.102 500 _r. 

-2.93689E-04 

-1.002126-04 

-7.30073E-03 

-2-»59827E“04 

2.07668E-04 

1.06056F-D5 

, angle 

RATES 

28-202500 -- 

-3. JB554E-04 
-9. 7 09 08 E- 05 

-7.32871E-03 

-2.^>9d27E-0^ 

2.08806F-J4 

1.21277L-05 

ANGLE 

. RATES 

20.502500 

-3.18104E-04 

-9.39029E-05 

-7.3t)269E-33 

-2.‘>9B27C-04 

2. 101 12t-04 
1.394461-05 

ANGI E 

28. .0250!) 

-3.2 733JF-04 

- 7.37867E-0T 

2. Uu 12. -J4 






w 


PHIS 

THETAP 

PHIP 

thetae 

PHIE 

-1. l8326E-a3 
-U03347E-0^ 

3.l2761E-0^ 

R.59395E-05 

4.00187E-03 

1.898296-04 

3. 13243E-04 
3.62107E-05 

-4.436846-05 

-4.40374E-06 

-1 J3E-03 

-1.06933L-04 

3.2l308E-0^ 

8.^98o7£-05 

4.02055E-D3 

1.83915E-04 

3.21817E-04 

9.52664C-05 

-4. 430616-05 
-4. 34926E-06 

-l*209to5E-03 

-l.054l5b-0'r 

3.29756E-0^ 

tt.39820E-05 

4.03368E-03 

l.7d924E-04 

3.30294E-04 

8.4^6856-05 

-4.5238CE-05 

-4.2B954E-06 

-1.22011E-03 

-l*0379^E-0A 

3.33 U'2E-04 
8.292<*3E-05 

4.C5636F-03 

1.74775E-04 

3.386696-C4 

8.32159E-05 

- 4. 566386-05 
-4.22436E-06 

-i.230^0E-03 
-1.020 70E-04 

3.^6339E-0<i 

8.18126E-63 

4.073o6E-03 

1.71398L-04 

3.46935E-04 

8.21074E-05 

-4.603276-05 
-4. 15349E-06 

-l.2^3^2E-03 

-1.002^3E-J<t 

3.5^463E- J4 
8 .Ou 462 E ”0 5 

4.09066E-03 

1.68729E-04 

3.5b0tt8t-04 

8.094286-05 

-4.64943E-05 
-4. 076746-06 

-1.250^56-03 

-9.83143E-05 

3.62467E-04 
7. 942496-05 

4.10743L-0J 

1.66715E-04 

3.b3l22E-04 

7.9/2UE-05 

-4.68979E-05 
-3. 993916-06 

-1.28DIBE-D3 

-9.62d:iC£-05 

3.7D346E-U4 

7.81488fc-05 

4.124036-03 

1.65305L-04 

3.71031E-04 
7. 844296-05 

-4. 72929F-05 
-3.90486E-06 

-1.26970E-03 

-9.^l556t-05 

3. 78094E-C4 
7.6d 184L-05 

4.14051E-03 
1 .644526-04 

3. 78B08L-04 
7.71084E-05 

-4.7o786E-05 

-3.H0942E-C6 

1 

-1 .27901E-J3 
-9.19267E-05 

3.35707E-04 

7.54343E-05 

4.15694E-03 

1.64121E-04 

3.864496-04 

7.57184E-05 

-4.80544E-05 

-3.70751E-06 

-1.288086-03 

-8.95988L-05 

3.93 178E-04 
7.39977E-U5 

4.17337E-03 

1.64276E-C4 

3.93949E-04 

7.42740L-05 

-4.04197E-O5 

-3.59905E-06 

-1.296926-03 
-8. • i722F-05 

4.00504E-C4 

7.25101E-J5 

4.18982E-03 

l.64aa7E-04 

4.01 302L-04 
7.27768E-U5 

-4.B7739E-05 

-3.48403E-06 

-1.3055LE-03 

-0.AO457F-O5 

4.0767dE-04 

7.09735E-05 

4.20637E-03 

l.o592iE-Q4 

4.0d502L-04 

7.I2286E-05 

-4.9U62E-05 
-3. 36243E-06 

-l.3l3d^E-03 

-8.20223E-05 

4. l469oE-04 
6.9389dL-u5 

4.22303E-03 

l.673blE-04 

4. 15545F-04 
6.96316E-05 

-4.94461F-05 

-3.23430t-06 

-1. 32191E-03 
-7.929H2E-05 

4.21553L-04 

6.776166-05 

4.239dbE-0i 
1.691 74F-04 

4.22425L-04 
6. 798846-05 

-4.976.78L-05 
-3.099 72t-0e, 

-l.3.^9 7JE-0T 

4.232^6f-04 

4.256H >1-03 

4.29i ;i3f -04 

-5.C0o5 7l -I'S 






...TIME 

_JHETAB 

PHIB 

THETAS 

PHIS 

THETAP 

PHIP 

THLTAE 

PHIE 

ANGLt- 28: 502500 

^-t3-3623JE-0^ 

-7.40466E-03 

2. 133302-04 

. -1.33720E-03 

4.347696-04 

4.27415E-03 

4. 356842-04 

-5.03042E-J5 

JRATES_. 

r-8.7330^E-05 

-2.59827E-04 

1.33104E-05 

-7.35473E-05 

6.43823h-05 

1.73847E-04 

6.457S0E-05 

-2.81165E-0/. 

ANGLE-«.2a.6^^500 

-. -3.AA79i>t-0A 

-7.43064E-03 

2. 15287L-04 

-1.34440E-03 

4,41 120E-04 

4.291d7E-03 

^.A20b3E-04 

-5.06277E-05 

^RAItS 

^r8.3947lE-05 

-2.59U2BE-04 

2.07730E-J5 

-7.051 76E-05 

6.263/4C-05 

1. 766682-04 

6*2dll3r--05 

-2.65850E-06 

ANGLE-. 28.T0250Q. 

.-3.53016E-04 

•7.45662E-03 

2.174962-04 

-1.3513CIE-03 

4.472956-04 

4.309506-03 

4.43244L-04 

-5.088562-05 

RATES 

-8.04999E-05 

-2.5982aE-04 

2. 33597E-05 

-6.738296-05 

6.085982-05 

1. 797902-04 

6. IJ 1 44E - 

-2.499552-06 

ANGLE- .-.2B.BD2500. 

-3.5 J891E-Q4 

-7.482602-03 

2. 19967E-04 

-1.357aaC-03 

4.532906-04 

4.327652-03 

4.54234E-04 

-5.U2 73E-05 

RATES 

-7,69B94E-05 

-2.59U2dE-04 

2.60207E-05 

-6.414UE-05 

5.905302-05 

1.B3197E-04 

5.918792-05 

-2.335C3E-06 

ANGLE_.2fl. 902500 

-3.6B4UE-34 

-7.50859E-03 

2.22706E-04 

-1.36412E-03 

4.59104E-04 

4.346152-03 . 

4.60080E-04 

-5.13523E-05 

-^RATES - ^ 

- 7.341 60E-05 

-2.598286-04 

2.370522-05 

-6.079006-05 

5.722052-05 

1.828766-04 

5.73355E-U5 

-2.16521E-06 

JINGLE 29.002 500 

-3.7i57lE-04 

-7.53457E-03 

2.25712E-04 

-1.37J03F-03 

4.64733E-04 

4.365046-03 

4.657192-04 

-5.15601F-05 

RATES 

-6.97aC4E-05 

-2.59828E-04 

3. Iiol3£-05 

-5.732T36-05 

b.53658E-05 

1. 908132-04 

5.S461U-05 

-1.99039E^06 

ANGLE 29.102500 

^-3.8235.42-04 

-7.56055E-03 

2.289796-04 

-1.37558E-03 

4.70176E-04 

4.33433E-03 

4.7U71E-04 

-5. 17501C-05 

__RAIEJ^ . _ 

.r-6.60b30E-05 

-2.5yd2aE-04 

3.393936-05 

-5.37508fc-05 

5.34925E-05 

1.949:>8E-04 

5.356852-05 

-1.810d6£-06 

ANGLE 29.2 02 500 

-3.«d7d4E-04 

-7.58654C-03 

2.32493E-04 

-1.380776-03 

4.75433L-34 

4.404052-&3 

'••73432E-04 

-5.19220E-05 

RATES . . - 

-6.2J247E-05 

-2.598282-04 

3.o3d78fc-05 

-5.005816-05 

b.l60J8E-05 

1.994206-04 . 

5.16612E-05 

-1.62695E-06 

angle _29 .30250^ 

-3.94B26E-04 

-7.61252E-03 

2.36253E-04 

-1.385596-03 

4.B949c>E-04 

4.424236-03 

4.ai5G2C-04 

-5.20753C-05 

RATES 

-5.85062E-05 

-2.59828E-04 

3. BO594E-05 

-4.62 4 722- 05 

4.9rC33E-C5 

2.040692-04 

4.97428E-05 

-1.43897E-06 

—ANGLE E9.402500- 

r4.004d3E-04 

-7.63850E-03~’ 

2.40224E-04 

-1.390026-03 

4.B5370h-Q4 

4.444882-03 

4.85330E-J4 

-5.22096E-05 

RATES - . 

-5.462846-05 

-2.598286-04 

4. J708/E-05 

-4,231626-05 

4.77942E-05 

2.089372-04 

4.7B168E-05 

-1.24726E-06 

ANGLE 29.502500. 

-4.05749E-04 

-7.6644dE-03 

2.44386E-04 

-1.39404F-03 

4.93054L-04 

4. 466022-03 

4.9l06bE-04 

-5. 23245E-05 

RATES 

-5.06925E-05 

-2.598282-04 

4.24938L-05 

-3.826342-05 

4.58795E-05 

2.140172-04 

4.58863L-05 

-1.05213E-36 

^ANGLE 29.602500 

-r4.l061BP-04 

-7. 690476-03 

2.48711E-04 

-1.397666-03 

4.9VS46E-04 

4.487692-03 

4.9t>557E-04 

-5.24198E-05 

RislES « 

r4.66998E-05 

-2.59828E-04 

4.39766E-05 

-3.408766-05 

4.39621E-05 

2. 193012-04 

4.39b44E-05 

-d.53916£-C7 

ANGLE-^- 29 .732500 

-4.15J36E-04 

-7.71645E-03 

2.53168E-04 

-1.400862-03 

4«9d846E-J4 

4.509892-03 

4.97355E-04 

-5.24951E-05 

„RAIES 

-4.26519E-05 

-2.59828E-04 

4.51240E-05 

-2.978782-05 

4.2044 7E-05 

2.247852-04 

4.2U239E-05 

-6.52912E-07 

ANGLE -29.802500- 

-4. 19146E-04 

-7.74243E-03 

2.57721E-04 

-1.403616-03 

5.029S5E-04 

4.532662-03 

5.03961E-04 

-5.25502E-05 

RATES - 

-3.653052-05 

-2.59828E-04 

4.59078E-05 

-2.536386-05 

4.ul297t-Cl5 

2.304642-04 

4.0D971E-J5 

-4.494U8E-07 

I.AMGLE -.29.902500- 

-4.22793E-04 

r-7. 768426-03 

2.62333F-04 

-1.40592F-03 

5.06872E-04 

4.556002-03 

5.07H75E-04 

-5.25fl49E-05 

RuTFS 

-3.439762-05 

-2.598286-04 

4.63055L-05 

-2.081576-05 

3.H2191E-05 

2.363332-04 

3.81765L 05 

-2.43871E-07 

*~A Nr. L F 30.007 5 6T 

-4.26023C-U4 

-7. 794 ‘.06-03 

2. 6o'^6<#E-04 

-1.407771-03 

• 1 0 4 V 1 J 4 

4.5799 JC-01 

5. US97I -04 

-b. 259H8I -Ob 
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GUST VELOCITV PROFILE 


I 


1 . . 


AA 


BB 


V 



7 _ 

a- 

9- .. 

IQ ^ 

izIL. 

L3 



L5 



17 

LB 

- ^ 

Z£L.* „ 

,_2L 

22 

za_ .. 

-^ 2-4 

25 

26 

27 

za 

30 

31 

32 

33 _ _ 

34 

36 

, 37.^ 

39. ^ 

40 . 

41 
42. 

4^ 


1.263B397L13B7L92E1-00 

l*242tiu974X25567 7Ef00 

l-22l6n5942tS0302BEl'00 

1.2004/75tll66a7BSe<'00 

I* 1 791939605 a4 534E 4-00 

l*L5 7Q4Vil52 93da3l£h00 

l.l3G43fi310455vtl6E4-0Cj 

l.il49fi503554Ci/4lEt00 

. - 1.0934940j070b940E4'UU 

- . ... l-pQ7L974632o77204Htu0 

I.050436370ti0lb32£4'00 

1.02Bdtiljdol9l7B26£+CJ 

U0C73409btj2073bl£f0a 

9.35dt;2m049395QE^UL 

. 9.642B3l6787bT259E-0l 

.. 9*42 79236 7823a8/6E-‘0l 

.. 9-2l3i91376026223E-ai 

a. 9993308 7351 1666E-0I 

. 8.73ba36065l45674£-0l 

. a.57330Cb97245l9i£-aL 

Le.3609l?u26916354E-01 

iJ.149 6807dllC8a70E-01 

7.939 382 1 158036 lOE -01 

7. 73 01 140 7537822 5E -01 

. .. 7.5219684521401 J3E-QI 

7.31 53 365460668 00 E-Ql 

7.109409124755075E-01 

6.9051 763836 L04a3L-0 1 

6. 70242 793 62 8U78E-01 

6-501252625367B62E-01 

6.30173H783408624E-01 

6.1039/389417883oE-01 

. 5.90«0447Q43COI53E-01 

5.714037135193274E-01 

5.52203634537B68CE-01 

5.i32l26 493l51605E-01 

5.14439039 9tj3a9i5e-OL 

4.95a9U9l?2o2298E-'0l 

. 4.775770atia6l558JE-01 

. . 4.59504dl6078LJ930E-OI 
4.416B23J03089938E-0 I 

.. 4.24lI/35iJ2354598E-tn 

4.9o£JI 769 J 35 74‘jlBE-Ol 


1 . 

1 . 

1 . 

U 

1 . 

u 

u 

1 . 

1 . 

u 

1 . 

1* 

1. 

1 . 

1 . 

I. 

1 . 

1 . 

1 ^ 

1 . 

1 . 

u 

1- 

1. 

1 . 

1 . 

1 . 

I. 

I. 

1 . 

I- 

1 . 

i. 

I. 

1 . 

1 . 

X. 

1. 

1 . 

1. 

1 . 

I. 

K 


263B3g7ll387192Ef00 

28476662B714530E4'0D 

3055ai3l3957I77Ei-00 

32 6 274 6 370 635638+00 

346837521215754E+0Q 

36726u946aH329£ + 00 - - 

387535955417974L+30 

4076536537 j6ia4L+00 

42/60521734t,958fc4^00 

4473ai894ttj42l7£+G0 

466975O11572941E+00 

48:.375973184*i58£ + 0a 

5055762A9775936Ei'0a 
5245674794233691 f JO 
54334l2/l9l55b7L+00 
56 I 8 89 4 12408199c +00 
58J263756Q3569LL+00 

59d27o2964L0l79L*^00 

61609907949495 1£ +00 
6336 64 2963 3L809E.+ 00 
65 3 964 24242002 4fc +00 
667991329246036E + 0i3 
6B473B3a8I8l652L+00 

7GU971735112I lE + OD 

71 736l36570l493Li^0a 
733 22.J5 74 5 70644E ^00 
748 7 76 84239705 6E»- 00 
764O143469/l5l4E+0a 
/7B9294u45d9664Lt00 

7935154/29836641+00 

807766154191938E+00 
821675197365494£*'00 
835 2 36 50 1 50 974 bE+ 30 
84 84441 181 606 858 I- 00 
861 29225399403 7E+ 00 
873775273i66434E^0Q ^ 

8a5BB7703787460Ef 00 
897624223321 j95E 1-00 
90a9796y291678/E>00 
91 9 949 1 286 6689 3L** 00 
933t?2?7l89n»6lE+00 
940 710 82 3 7 5064 26+00 
95 0^.-y 39762 7605 7f f 00 


2. 5276 79422774304 E +00 
2.527576369970220E+00 
2. 52 726 7256760 I97£h00 
2.526752210732341E+OO 
2.5260314aifi002eBE+00 
2*5251053621046548+00 
2.523974265a 739608+00 
2.5226386392468188+00 
2.5210992180533918+00 
2.519356527561413E+0C 
2.5174113821744078+00 

2.515264635I022B4E+0D 

2.5129172279032808+00 
2, 5163701904727848+00 
2.5076246397907066+00 
2.5046817802320768+00 
2. 50 1 5429026 33 iCiuE +00 

2.49b209383331366E + DO^ 

2.4946d26a6Q095ilE+00 
2.4909 64 35MO6 3laE + 0D 
2.46705602: lll69flE+00 
2. 4829594 07 3 56 915 E +00 
2.4 786 76 2:7 9 76 22138 + 00 

2. 4 74208581 04902 /£ +00 . 

2.46955a2l09l550aC*00 
2.4647272291 7731 lE +00 
2.4 59 71 7754B72557E +00 
2.4545319353325518+00 
2.449172195217/938+00 

2.4436407355204478+00 

2. 43 7940 03 25 32 794E+ DO 
2.4320725367833778+00 
2. 42604097 1939756E+0C 
2.4198478335800098+00 
2.4134953885318988+00 

2.406 96/ 92 2681 5.'4E +00 

2. 400326790751 294 F +00 
2-39 35 154 1454 7 32 3E +00 
2.386556781/733396+00 
2. 379 453 944 74 498 IE +00 
2. 3722 10 019 0008*1 68 +00 
2.3646281819860988+00 
2. 457 ill67l63i497F + 0L 




46 

47_ 

49 

_ - 50 . 

3 
• 3 
3, 

2 

2 

52 

. 2 

53 

- . 2 

-54 

.2 

55 - . 

. 2 

.56 

. 2 

57 

1 

58 - 

1 

59 

_ 1 

60 - 

— 1 

6L . 

X 

62 . « 

1 


1 

64 _ . 

1 

-65. 

1 

.66. 

9 

67 

. . a- 

68.. 

. a. 

_ _69_. 

7 

7Q.._ 

6 

ll. ^ 

. • 5. 

72„_ 

5 

73 . 


J4.. * 

. 3 

^ ^ 7^ - 

3 

76- 

- 2 

77 

2 

, . , 1/ 

7a 

«_.79 

, .. _ 1 

„ BO 

1/ 

.85 . 

__ ft 

8Z~ 

5 

83 

_ 3/ 

_B4 

2 

_ .B5_ 

9 


„sa 

09.. 

90, 

91 

9?. 

93_ 


2.?5 3393^2-3129769E-04 
_l.llQt>r9 709973078E-IO 
2.25y72b35663So2£3E-0^ 
_9.a3l5 7<t96Q8 95902£-Q4 
2.0312 579!>763636aE*-U3 
3*o097 79a9 34^^<>J7E“03 
5.638023509537 7U7C “03 
.a.ll bl l65445J31/4t“j3 

I .1 1 - . , , n;-.. 1 , ' i I 'i 


l.97740l696492365F+a0 
1.985 543909a40963E«- 00 
1. 99 J2 665 05590 101+00 
2.0035660963406341 +03 
2. 00 74 3948023340 IE + 30 
2.013883642361 776L+00 
2.0198357560900371+00 
2. 025 4 73 1842 94 086E +00 
2.03051 34805 1H113E +00 
2. 0 35 3 14390047 77 3U +00 
2.03 J 5 7335089913 lE+00 
2. Ot 3 339994 7231 7 IE + 00 
2.04u76l 147625219E+0J 

2. 04 9 6 o5 3 300 ;9 30 7E + 00 
2. 052162 7616 76669E+ 00 
2.054l90tf5343B535F+00 
2. 0557692 16742632E+J0 
2.056b J7 1591 13461E +00 
2.0575 74 1 8584560 OE +00 

2.05 77999999 72218E + 00 
2.05 75745Q2442463E+00 
2.0560977921 67746E +00 
2.055770165976952E +00 
2.0541921184064936 +00 
2.0521643418834266+00 
2.049O87 7256217J9E +00 
2.0467633560321876+00 
2-04 3 392 5 1 5846008 E»0Q 
2. 0395766836320066+00 
2. 0353 175331 48 1316 +00 
2.030616932607273E+00 
2. 0254769438 J7U53E+ JO 
2.0198998214/93426+00 
2.0138880117933346+00 
2.0074441517907226+00 
2.0005710679745626+00 
1.99 32 71 7751 2072 56 +00 
1.9855494749552636+00 
1.97740755475DC80E+00 
1.9683495853372056 +00 
1.9598793220421706+00 
1. 9505006980 37573E +00 
1-9407178276170926+00 
1. 930535 001891094E+00 
1.9199566874043736+00 
1.90898/5241 769866+00 
1.89 7 632 12 366(H5bC +00 
l.B85896066oo9:>15! +00 


2.3339873572615356+00 
2. 32 5965 6924912956+00 
2.3178264008352306+00 
2.309 5730524 7243 0F+00 
2-3012092676111230+00 

..... . 2.292 738 714901206E + JJ 

2-2841651090237756+00 
2.2754922130636006+00 
2.266723828857J9iE+00 
2.2578630033262886+00 
2.2489I60227aa4o4E+00 
2.239884412u54579£+LlJ - 
2. 23 0 7 72 9 32 70 6074 E+ 00 
2- 22158 55313 5 7658 6+^/0 
2.2 1232633 7904099E +00 
2. 20299941 37 52693E +00 
2- i 93608750041648 E+00 

2-18415851S845733E+00 

2.17465285o369363E+00 . 
2.1650959411284846+00 
2. 1554919621 21545E +00 
2.1458451319908816+00 
2.1361596821747736+00 

. 2.l26439fl6l051523E+00 

2.1166899320 7584 !E +00 
2.1069141 7l9u38UE + 00 
2.0971168685419886+00 
2. 08 73023194 16 5516+00 
2.0774748295332186+00 

.‘2. 06 '1638 7095 89048 6 +00 

2.Q5779327403D486E+Oa 
2.0479578392410086+00 
2.0381217215627036+00 
2. 02829423546 3.053 E +00 
2.018479691637424E+Q0 

2.OO8682395074274E+O0 

1.998 9066432 16 7 49E +00 
1-989156724052769E+00 
1.9 7943691 42 39 083 £+00 
1-969 75147 72255296 + C'O 
1.960 1U46613 346' 6 6 + 00 

.1-9505006931436306+00- 

1.940943Q00152752E+OD . 
1.9314381593879306+00 
1.9219879453620056+00 
1.9126973032 7 J424E +00 
1.9032703521/84956*00 
1.89401 I 1832 I 434 6E + 00 

1 ■ , li 1 . .. . I > t ■ 1 t jj . ). . 


il 

si 

il 

:« 





I 


t 
















96 r . 2.718824560755906E-02 

99 _ 3.?328695568474956-02 

100 . 3ti790b2766898-3570E-02 

.101- „ 4.39 I854243376003t-D2 

__t02 3.0362a55624473S>lE-D2 

-103 5.7236389554969226-02 

__1Q4 ... 6.4536l29252065d7E-02 

-.105 _ 7.2258872793619316-02 

.._106 8.040123271327237E-02 

_ iOZ... - a.8959o3748613367E-02 

108 9.793J33309548l2i'E-02 

_iOa. . . 1. 0730938467930836-01 

110.. _ 1.170926782563924E-01 

-111—... 1.272759225307372E-01 

-112.— 1.3705465077397606-01 

_1L3 1.488242227845475E-01 

— U 4 1*6017982692315606-01 

_U5 1.719164822231 756E-01 

-U6 1.84C2904057566356-01 

..ilZ_ 1.9651218898732036-01 

. lia 2. 0936045191109366-01 

-119_.. 2.2256819364785056-01 

_12n 2. 3612)62081 848386-01 

121 2.5003878490496066-01 

- 122- 2.64211 )5B48597266t-0l 

-123. 2. 7«d757o970166OOe-Ol 

124.. . . 2.93 79094165808006-01 

- 125. _ . 3.0902 6558171 C2 026-01 

_126_- . 3.245 o 19J5567 l 5876-01 

.127... 3.4C44't25l58K«7?16-0l 

__l2a.. 3.5660854846791076-01 

-129_ ... . 3. n0677359761llOE-01 

:J30 - 3.8901459453614246-01 

-.-131 4.0664177838794976-01 

— 132.. 4.2414181081105666-01 

—131... 4.4170712740043436-01 

—134 * 4.5952 )99939520476-01 

_135 4.7763261705804656-01 

-136...- . . 4. 9591705310453986-01 

-137. 5.144652 7410 009686-01 

J.33 5.3323914438393776-01 

.139 . 5.5223042083755/26-01 

140.. 5.7143C797297C0476-01 

-141 - . 5.9033182780666306-01 

142 _ . .— 7». 1042501039359826-01 

143 6.3020175080011506-01 

. 144 . ... 6.5015337425373336-01 

145 6. 70 2/1 12 )2 726i. ;r>r.-!n 




1.035<'450VlOV44l3l:<-yU 
1.8216848336050906 4-00 
1.8C77/6C 322 5967564-00 
1.79352 558854665 76 4-00 
1.7789397532108716400 
1.7640249241 116886 *00 
1.7437876434166766*00 
1-7332345947320116*00 
1.71 73726001 707696*00 
1.7012086173605646*00 
1.684 /'t97363')l62J6*00 
1. 66 8 0031 767 06 84 06 * 00 
1.6509 7628 3 9 3527 26 *00 
1 .6336765266695966*00 
l.6lt.ll 14931 )0665t*00 
I, 598288880 I 38 7186 too 
1.580216 5291 33 OS 56 *00 
1.5619023433473426*00 _ 

1.5433543640236856*00 
1.5245807269577656*00 
1.5055896669257866*00 
1.4863895140732886*00 
1.466988o9026l2fi 76*00 
1.4473757053720a76*OQ -. 

l.427ol915 J5 765866*00 
l.40766770‘)5ci4642E *00 
1.3875501247399036*00 
1.3672752233812356+00 
1.3468518987770661 *00 
1.3262091092994456 *00 _. 

1.3055-458745246346 *00 
1.284781271226 7706 *00 
1.2638544294214926*00 
1.2428245283561 746 *00 
1-221 7CO/924836lCt*00 

1-2004924374150366*00 

1-1792089153598066*00 
1.1578594135373/36*00 
1.1364533450393796*00 
1. I l50C0099968924t *00 
1.0935090883223646*00 
1.0719897363617886*00 
1.0504514847300976*00 
1.0289037793607166*00 
1. 007 3560723 3356 SE +00 
9.851)1 701522933206-01 
9.6429;)4554835863I: -01 
9. 42 !l 3 74 32 74 23 7 0 6 -0 1 
9. 71 )54l /.V74 19- -01 


3.35 r /33U 732 /U2/bl:*UU 
1.B48873079212645E+00 
1.840 104727828 U'i6*00 
1.8314318652314876*00 
1.8223532956446296*00 

...1.8143877797361586*00 

1-8060240329716636+00 
1.7977707239840736*00 
1. 7696314729643886*00 
1-7816093500738356*00 
1.7737093738777506*00 

1. 765933509602366 6>00 

1. 7582 85t*686l4576 6*00 
1.7507692049259876*00 
1. 7433874157214016*00 
1.7361435309126926*00 
I- 729040 751 91 84826*00 

1.7220821702704976*00- 

1.7152708462468606*00 
l.70ao0976753342tE*00 
1.7021018559131066*00 
1.695 7499659843 aE*03 
1.6895568839091136*00 

1.6835253261905436*00 

1.6 776 579384815456*00 
1.6719572944243676*00 
1, 6664258945215596*00 
1.6610661650393156*00 
1.6558U045o9430eiE*00 

-i. 6506/10448564936*00 

1.6460401261135056*00 
1. 6413898196946806*03 
1.6369221653976006*00 
1.6326391228923146*00 
1.6235425708715596*00 

1.6246343062268886*00 

1.6209160432533306*00 
1.6173894129325756*00 
1.6140559621474256*00 
1.61091/1530734596*00 
1.6079743625024616*00 
. 1.6052288812457226*00 
1.6026819135676506*00 
1.6003345766577236*00 
1.5981879001402256*00 
1.5962428256229306*00 
1.5945CC2062o359flE*00 
1-5929608064966206*00 
I .-i'lu./si Ji 4 ‘IS 40 if *aa 
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^program ; ACATE( lNPUT*OUTPur,TAPElj=lNPUT,TAP£6=DUTPUT.PUNCH) 

I • , ^ 


C 

C. 

■X« 

..c<‘ 


-- .. ^ 

C ^# *** * »»«^ ^ ^ ^ ^ >> >#' ^ ^ ^ * 






C9. PURPOSE ^ . * 

C^ . 

C« PROGRAM LACATE INTEGRATES THE LAGRANGIAN EQUATIONS OF MOTION 

. _FOR. THE NASA-LRC/AFCRL LACATE fiALLOPN SYSTEM IN RESPONSE TO 


C* A SUOUEN WINU GUST. THE PENDULATIDN MOTION IS HANDLED IN THREE 

C* DIMENSIONS BY SUBROUTINE PEND. lURSlUNAL MOTION IS CONSIDERED 

C# IN TWO DIMENSIONS BY SUBROUTINE TORS. SUBROUTINE CORL TAKES 

INTO ACCOUNT CURIDLIS FORCE EFFECTS IN TWO DIMENSIONS. THE 

.. GUST LOADING MODEL DESIRED BY THE USER IS CHOSEN THROUGH USE 

C« OF SUBROUTINE GUST. THE SMALL ANoLE APPROXIMATION FOR THE 

C* EQUATIONS OF MOTION IS EMPLOYED THROUGHOUT. SUBROUTINE PLOTS 

PRUV.IOES PLOTS OF THE SOLUTIONS TO THE EQUATIONS OF MOTION . . 

C* * (ANGULAR VELOCITIES AND ANGLES!. DAMPiNG MAY ALSO BE INCLUDED^ 


Cfr 

C^ 

C* 


PROPRIETARY 


NONE 


Ct USE . -• 

X* r I’CALL IjVC AT e7 . 1 ' " ' 

.C4^ . , _ . 

C^ PARAMETERS . 




C» NONE 

C»‘ 


C^' REQUIRED ROUTINES. . 

. - 

C» .. . GUSr.^OlFSUe*DlFFUN.PEND. TQRS.CORL 

C* AUTHOR/ implementor 

C* . 


* 

« 

$ 

* 

« 

♦ 

♦ 

« 

itt 

» 

♦ 


* * 'if 


^^JEICTSTAL* PAGE IS 
OF POOR QUALITY 


- D.ft.^)ORSPY^JR ‘ 

C=*= COMPUTER SCIENCES CORPURATIQN « 

NASA/LANGLEY RESEARCH CENTER PROGRAM OFFICE 

C* 

DMB RELEASED - „ ^ « 


C4' ^ 

C« SEPTEMBER 14,1973 

‘ 


.. C’6' LATEST REVISION ♦ 


C^ _ 

.SEPTEMBER. 14,l’973 ^ - - * 

C’fr ^ 

I c. __ 

J c 
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•..•BALLOON 

RADIUS = 64.008 M 

WEIGHT = 861.825 RG 
VOLUME = 39H CUFT 


..HELIUM FILLED 
..RADAR REFLECTOR 
..AFCRL PARACHUTE 
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. ..™, . * 



* ....4.....LQA0 BAR 

<■ RADIUS = O.6096 M 

LENGTH = 2.1336 H 

WEIGHT 5 112.9V, 5 KG 


...FLIGHT CONTROL 
ELECTRONICS 
...aiPQLE ANTENNAS--. 
...REEL-DOWN 


..L_=. 396-24 H 


.. .PARACHUTE .-BACKAGE 

RADIUS = 0.^572 H 

LENGTH - 1.5240 M 

WEIGHT = 37.1946 KG 

...AFCHL ELECTRONICS^ 

...GONDOLA PARACHUTE 

P = 3.3528 M 

PAYLOAD PACKAGE 


RADIUS = 0.9144 H 

LENGTH - 1.8288 H 
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CCCCCCCCC 

c c 

CCCCCCCCC 

c c 
ccc 


weiGHT 214.0956 KG 

...RADIOMErCR tNASAj 
•..TNSTRUMENTATIDN 
... CRUSH PAD 




0 . 

/I 



. RB / r 

/ 1 

_ . .. THETAIi*PHia 

/ I 

- A, 1 

- , X ^ . I 

1 + _ .... 

_ . I + AI 

...It- THETAStPHIS 

> 

« I# 

I ^ 

.1 ^ . 

.1 . 

... Y 

./. .... ... 

. /I 

L I 

/\ 1 

^ 

A. I THETAPtPHlP 

— y . I 

/ I 


L A C A T £ 


FUUR 

COUPLED 

PENDULUM 

CONFiGURATlDN 

• DtFINITiQN OF ANGLES 
• ' ■ AND LENGTHS 


1 


C-. .. ^ t 

* C . * i- 

C ... 

C I I- 

X P. 

C I f 

C . THETAE^PHIE 

C I f 

C 1 f 

C I f 


'..C . . • 

t: 

c. . . 

Q000Q3 .... . cnmm j CCMST / MB*MS,MP#ME*M.RatAlpL.P*RS*ftPtRE,G0RHOi^MU.N* 

- HSpHPpHE .... ... ... .... — 

X00003, . CnMMON/ CDRIO / OMEGA. LAMDA 

™.0Q0003..- OAMPC / AS CS . APCP* AEC E • D( 8J • I DAMP 

£300003. COMMON/ GUSTA / TOni8-UC3T8 

. 00Q0D3 COMMON/ TtSTC/ I PtNO* I TORS # I CURL 

. OOOOOi- . HEAL Ma,MS.MP»MEtH,L,HU*LAMDA 

.OOOjOIB DIMENSIO.N Y 1 128) t DY( 16 ) ^ WK ( 48 D J . 

OOQOOa _ DlMENSinw M(4J . T 



000003_I NAMELIST/ ANGL/ TH ET AO , T riE TAS * THETAP, THE TAE* PHI 0 »PH 1 S* PHIP .PHIE * 

1 TOOTSf TOUTPpTODTE*OaTS.OOTPtOOTE* 

2 .... OMEGA pLAMOA 

,... o nanoa N4M£U1SI/_C0NS/. MB.MS.MP.HE.H.ftUt Al.L.P.RS.RP.REtG.RHO.HU.ni.— 

* . hs.hp.he 

D00003 NAMELIST/ TEST/ IPENO. I TORS. ICORLt I PLOT. lOAHP 

OQOQ03 NAMELIST/ OIFl/ H. JSTART .HMIN.HMAX.fcPS.HTH.MAXOER. TO.TFtPtf 

000003.^ NAMELIST/ DRAG/ ASCS, APCP. AECE 

. C-~ RE AO NAMELIST INPUTS 

C , . 

O0G003 REA0I5.ANGLJ 

J10D0a&. .. . REA0(5,C0NSI 

ODOOil— READ! 5. TEST! 

DaQQL^ R£A0I5.d:f11 _ . 

. 000017... . REAOIS.ORAG) 

C .. 


' WRITE' WAHELlST INPUTS 

* G 

-..000022 WRITi:l6^ANGL) 

*.-> 000023. . WRlTEt 6#CDNS) 

OOOOSra WRIJEt^^TESD 

000033. . WRITE! 6.DIflJ . 

_.J3Q0036 WRirU6fORAG> 

c — Choose otsiREo gust model ano set up initial condltions for 

C BALLOON VELOCITIES 

X - 

QQ004I* - CALL GUST 

, ^ 

” C initialize the values for OlFSUB 

! obooftiL- - T=TO 

000063 N1=N'»2 - — . - 

- 000065 , LNCNT=17 

_C SET Y VALUES .AS INPUTS FOR OlFSUfl 

C 

00006& .. . YXll=THETAt> 

JJ0QQ62 .YI2J=PHIB . , . . 

— 000051— Y(3J=THET4S ‘ ‘ 

000052 - . Yt4)=PHIS 

00005.4 YtSJ^THETAP 

000055 ....Yt6l=PHIP . - - 

000057. „ .YI7I=THETAE ..... 

^000060 YI 0 J =PHIE 

__ Q00062. yf9l=TD0TB 

_..0Q0O63 ... . YUOJ=DOTB 

000065 _. Ylll) = TDUTS 

000066 .. Y{121-0mS 

000070 - .Y(13I = TDQTP . . 

000071 YIJ.6J=D0TP 

000073 YI151 = T00TE 

: OQOQT4 VI16J = D0TE 

ZZ c> 

C. . INTEGRATE EQUATIONS OF MOT.ION 

OOOOliZZ,. . . 23 CALL DIFS00lNltT.H*Y*tlK. JSTART»HM1N. HHAX.EPS. HTH,HAXO£R. lERR) 


CHECK:, -IF- the step was SUCCESSFUL 

pOOlLtZ- IFdERRe^EO.U GO TO- 50 

Z— 1 PItmi._r.H£ FOLLOWING IF THE STEP WAS UNSUCCESSFUL 

■ C . ... 

. Oaom .. WRlTEt6.3DJ lERR 

PQ0i22 .30 FQRHATtlH0//5y.,5HIERR=.I2///2X.3HWK=) 

PPDL22 . WR1TE(6«40J .CWK( I) *I°I.L12) 

000134 40 FORMAT (lH0.5X.<iE29. 15) 

, OQQ134. RETURN . . ... . 

; C IF THE STEP WAS SUCCESSFUL THEN WRITE THE FOLLOWING 

C 

PQ013& — 50 IFILNCNT.lt* 16) GO TU 60 

4PQM1 MR1TEI6.5S) 

. _55_Ea8HAniHltUX.4HTIHE»9X.6HTHETABt9X.4HPHIB.9Xf6HTHETAS.9X.4HPHlS 

I 9X.6HTHETAP.9X.4HPHIP.9X.6HTHETAE.9X.4HPHIE/) 

‘ — 000144 . LNCNT=0 

000145... 69 WPITU6.65I Tt lYI I >.I=1.N1) 

... OOOa62 . 65 FORMATIGH AMGLE.F 11.6. 3X.8I 2X* E12.5) /6H RATES.14X.8I2X.E12.5 J/I 

000162 PUNCH 68 .T«(rin.l=1.8) 

000126 ..PUNCH 68.T.1 YI 1) .1=9.16) . 

,000212... .68 FQRrt6Tax.F7.3.8E9.2) . : 

0.002L2 LNCNT=LNCNT«-1 

C.. . ■ . 

— — C- . CHECK IF THE TIME LIMIT HAS BEEN EXCEEDED . 

QQU 2 I 4 _Z IFtl.LT.TF) GO TO 20 

— 000211 s HR1TE(6.7QJ H.JSTART.IERR 

000230 70 FORMAT I/// .5X.E25.15.2I10X , 12) 1 

C 

.L— C— -..SET. UP PLOTS IF DESIRED 

C.. 

000230 lEHPLDI.EQ.il CALL PLOTS 


000233 RETURN 



. -00023a. _ 


END 


sapjooE wJAHra 

J.^iiBROuri:jE gusV 

C - . . I 

C« PURPOSE 

C* . 

C^ SUEJROUTiNE GUST COMPUTES THE ANGULAR ACCELERATION PRODUCED ON 

C<- THE BALLDQN BY A G^VEN GUST VELOCITY PROFTLE, THE VELOCiTY 

Cf . PROFILE MAY BE CHOSEN BY THE USER FROM SUBKUUTtNE GUST. THE 

C* FINAL VALUE OF THE W ARRAY IS TAKEN AS THE INITIAL CUNOLTION 

S C* ON ANGULAR VELOCITY FOR THE BALLJOV* 

CP . THE ROUTINE ALSO DEFINES THE EQUATION FUR THE GUST 

. VELOCITY PROFILE. THE ARRAY AA RETURNS THE VELOCITIES FOR 

CP -R8.LE-X.LE*0*. WHILE ARRAY BB CONTAINS VELOCITIES FOR THE 

C=«^ RANGE 0*LH*X.L£.+RBn 

CP - . , 

1_ CP PROPRIETARY 

CP 

C« NONE 

. . CP . . , . 

CP USE 

CP CALL GUST . . 

t> PARAHFTFRS 

CP . , . . 

^ C* - . . .NONE.. _ ... 

: CP : 

C<^ REQUIRED iinUTINES 

- CP 

CP . NONE ... 

— _ . C# AUTHOR/ IMPLEMENTOR 

CP D.R. DORSEY » JR - B.SEAY 

1 C« . 

CP DATE RELEASED . 

CP .. 

- C^ EPTEMBER 1^*1973 

C* LATEST REVISION ^ 
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^ . 000034 
‘ 000042 
. .. 000044 
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C ... . . 

c 

c , . 

OaSdMDM/^iliJSIA 7 -T0DTa,DDTB . . . — — - 

. DI MENS ION AAI151), BBllSUtVaSl J#Ht 15U 
C 

(; !>*♦*# <»a><r*i«t:((4t<ti(e4f*Cjfii*#jSt<r*« It friMi4i#i}r 4; 

ll 

C fJEFINl; THE GUST VELOCITY PROFILE 

C . -. t 

RFAf)(5*7J ALPHA.NU.NRB 
7 FORMAT* 5XtF5*l,2I5) 

Pl=3a4l6 

PIA~Pl/ALPHA 

RB=64,0 

.ZNU^FLOAnNUJ. 

2NUA--(ZNUi’ALPHA» 

VM=2.057S 
VM2=0.5«VM 
J=NRHvl 
WR ITE16«I0) 

LQ FORMAT UHL t30X,21HGUST VELOCITY PROFILE.//) 

C - 

C DEFINE CENTERLINE VELOCITY tCQRRESPQNDS TO X-OJ 
C 

AAm = VM2#U.0-C0StPIA#ZNUA)) 

BimUAAJU 

. vm-AAIIl+BBIU 

WIUTL(6«20) AAm.BBCD.VlU 

20 FORMAT 1 5X. IHI . 23X. 2HAA.34K.2HBB , 36X.1HV//4X. 3H 1.31 12X.E24. 15M 




DEFINfe THE QFF--CENTERL INE VELOCITIES 

00 40 1-2 tJ 
-- 2M=FL0Am-n 

AA( l)=VM2<‘a*0-COSlPIA’f'l-ZNF2NUAm 
OB n ) ^ VM2>0t { I . 0-COS t P I Aflt ( ZN4-ZNUA J I J 
V(n-AAU)^B3(n 
WRITE I 6. 30) l«AA(n.QOm*Vm 
30 FOKMATIAX. I3.3a2X«£24.15) ) 

40 CDMTinUE . * - 

COMPUTE T.iE angular VELDCIUES 
URITE(6.50) 

50 FORMAT I lHlf30X,23HGUST ROTATIONAL IMPULSE,//) 

^ IRB*RD)4'IV(2)-Vm ) 

WRTTE(6t60) wm 

6Q FORMAT l2dX, I HW//4X.3H I tl2X. E24, 15 I 
Dll 83 K = 2aNRB 
ZN^FLiJATU > 

Jirl.5/lRB»Rb)«'ZN^lV(Ki^l)-V( K) I 

WRITFI6,703 K.WlK) 

70 FORr^AT (4X. ia.l2X.E24.l5> . 

aO-CQNr.lNUE 

TOaiB=0-01frWa503 
UOTB =0.01*W1150J 

RiTURN'*7*”V^ ‘ 

END 
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SUBROUTINE OIESUB t N*T ,H. Y, MK , JSTART »HHIN.HMAX. t PS, HTHt MAXOER . I EH.R) 


C* 

. c« 

Cf 

c* 

c* 

f.* 

c* 

c* 

c* 

c* 

c? 

c# 
. c* 

f.« 

c* 


PURPOSE - 


SUBROUTINE OIFSUB INTEGRATES A SYSTEM OF N FIRST ORDER ORJINARY 
DIFFERENTIAL EQUATIONS OVER ONE STEP OF LENGTH H AT FACH CALL. 

H CAN BE SPECIFIED BY THE USFR FOR ANY OR' AI L STEPS. BUI. IT HAY 
BE INCREASED DR DECREASED BY OIFSUU WITHIN THE RANGE HHIN TO 
THE STEP ADJUS'TMENr IS USED TO ACHIEVE AS LARGE A STEP AS 


^00000030 
+0CJ0J040 
♦OOUDC050 
♦OGOf OJoO 
♦'OCbCC'DTO 
RQObOOOeO- 
HMAX#lCCu0090 
*;ccDJioo 


POSSIBLE, while not COMMITTING A SINGLE SItH E«KOR WHICH IS «-OCOOOUO 

LARGER THAN EPS IN THE L-2 NORM. THE USER SPECIFIED PARAMETER MTM» J0'_00120 


-INDICATES WHETHER THE SYSTEM IS TO BE SOLVED BY NOM-SIIFF OR 
STIFF METHODS. 

PROPRIETARY 

NONE. 


^JGijJUI30 
^COCCOl^O 
«0C00Ul5O 
♦ OOCCiClbO 
♦0C>7Q0170 
*C‘COOOIHD 


C* *00UGjlV0 

C’ *OOGGjik^D 

1 c«= - *00000210 

C* .XALL OlFSUfllN. I, M.V.MK.JSTART. HM1N.HHAX.EPS, HTH.HAXDER.IERR3, . *0000 ^220 

C* ■ *00000230 

C* PARAMETERS *OOODJ2'tO 

C* . .. .. - *0CQC0250 

C* NUMBER OF FIRST ORDER DIFFERENTIAL EQUATIONS. *OCO0O2t.O 

C* .. - *0001,0270 

________ C* T-rrrr-THE -INDEPENDENT VARIABLE. . *0JuLiu2B0 

C* *00000290 

C* H ON INPUT, THE STEP LENGTH TD BE ATTEMPTED ON THIS STEP. *00000300 

C* ON OUTPUT. THE STEP LENGTH DlFSUB RECOMMENDS FOR THE NEXT *00000310 

C* . STEP. OIFSUB MILL USE ITS RECOMMENDED STEP LENGTH UNLESS *OCC0u32O 

C* THE USER MODIFIES IT. *00000330 

C* . *00030340 

C* . H HAY BE ADJUSTED UP AS FAR AS HMAX OR DOWN AS FAR AS HMI N*OOJOO JbO 

C* BY OIFSUB IN ORDER TO ACHIEVE AN ECONOMICAL INTEGRATIUN. *00000360 

C* HOWEVIR. IF THE USER SPECIFIES AN H VALUE. IT HILL BE USED*000003/0 

C* _ PROVIDED SUCH AN H DUES N IT CAUSE A SINGLE STEP ERROR *00000380 

C* . GPEATER THAN EPS. THE USER IS REQUIRED TO SUPPLY H ONLY ON*OCO0039O 

C* THE FIRS! CALL. TO SAVE CUMPUTtR TIME. THC USER IS AD VISED*OOb004U0 

. ■, C* . TU USE A SHALL STEP ISAY .IZSE'Oul FOR THE FIRS! CALL. *00003410 

C* AFTER THE FIRST CALL THE STEP LENGTH HILL PE INCREASED BY •00000-*20 






C 4 t . , . niFSUB. *00000'*30 

- C» . . . «00000'«40 

C* Y-z ;AN ARRfty OF 8*N LQCAIIQNS CUNT AIMING THE .DEPENDENT *00000^*50 

- C* VARIABLES AND THEIR SCALED DERIVATIVES. Y(N*IJ-1I«-IJ *000J0‘t60 

. C<' CONTAINS J-TH DERIVATIVE OF YIIl SCALED BY *OUDOD'.70 

C* HMJ/FACTORIALIJ) . WHERE H IS THE CURRENT STEP SIZE. ONLY *OCC,OC^dO 

_ C<> Vm.I^i.N MUST BE PKDVIOEO BY THE CALLING PROGRAM ON THE *00^00^^90 

C» ... . FIRST CALL (INITIAL VALUES!. DERIVATIVES ARE CALCULATED BYeOL’OODSl-Q 

C* DIFSUB BY NUMEP.ICAL DIFFERENCING AND DU NUT NEED TO BE *DC’j00S10 

C«' PROVIDED BY THE USER. IF IT IS DESIRED TO INTERPOLATE Tu •OCOOJSZO 

C* NON-HLSH POINTSi THESE VALUES CAN flC USED. IF THE CURRENT *aCL00S3Q 

C* STEP SIZE IS H and THE VALUE AT T«-E IS NEEDED. FORM S = E/H *00J00340 

CO AND COMPUTE • ojOuOJbSD 

CO oCGODJSbO 

C# NO 

C» ylI)(TEE)=SUM YINo|j-lJ*I)osooj oODOODSttO 

C* JsO ... ODCC0U59O 

...... CO ... , oOLDOOtiuD 

CO WHENEVER OlFSUB IS CALLED WITH JSIART^O. Y I 1 1 . 1 =N*1, flON oouoOOt.10 

- CO IS SEI TO 0. OD0000620 

- CO •• 000030O30 

_ CO HK-.7--— A WORK STORAGE ARRAY OF DIMENSION NOINoHI. THE USER NEED OOOJOOGAO 

CO ONLY DIMENSION THE ARRAY CORRECTLY. THE ARRAY IS ZERO odCDjdSSO 

Co FILLED OR INITIALIZED AND USED. BY DIFSUB. THE USER SHOULD OjCJDOttoO 

CO . . N;II PUT ANYTHING INTO THE ARRAY. THE ARRAY IS USED TO ooOoOOoTO 

_ . C* , HOLD THE FOLLOWING ojODBOoBO 

CO O00J00690 

..CO KK(H-WKI80N) OODOOO/QO 

£0 IHE.Y ARRAY VALUES ARE SAVED IN. THE EVENT THAT A. STEP* OCO J07I0 

CO most BE REPEATED. ojcc;D»^/20 

CO OOOJ00730 

_ CO WK(tt*N0ll-HK(90N) *00000740 

- CO , HOLDS CORRECTION TERMS IN THE CORRECTOR LOOP. *QOOOD7SO 

- CO ’ OU&L00 760 

CO UKJ.90NolJ-UK(100N) . . OOCOOJ770. 

CO HOLDS SUMS OF ALL CORRECTION TERMS IN THE PREVIOUS *00000780 

.C* STEP AFTER THE SUMS HAVE BEE.N ACCUMULATED IN *00000790 

... CO WKU30N*If .I=1.N FOR THE CURRENT STEP. THIS ENABLES oOOCOOdCO 

... CO. . THE BACKWARDS 'DIFFERENCE OF UK(13*N*II TO BE FORMED *00000010 

. CO , AND USED TO ESTIMATE THE STEP SIZE FOR ONE ORDER *30000820 

—CO HIGHER THAN CURRENT. . 00C000830 

CO OD0G00840 

- C* . .. . WKI lO*NFU-WKtU*NI *00u00850 


c« • HOLOS ThE derivatives DF YlIJ WITH RESPECT TO T WHEN *00000060 

C* THEY ARE COMPUTED BV OIFFUN. *00000870 

C* . . ■ *00000880 

C* Hltm*NHl-WKtl2*Nl *00000890 

C* -HOLDS THE DERIVATIVES OF Yl I) WITH RESPECT IQ T - - +00000900 

C* - DURING JACOBIAN EVALUATION, +0CO3J910 

C* . *00000920 

C* . UK.U2*N*-U-HKU3*N) *00-01930 

C* HOLOS THE MAXIMUM ABSOLUTE VALUE QF YIII UP TO AND *0CjD09A0 

C* INCLUDING THE PRESENT STEP. *00300950 

.C* - *003Q09t.O 

C*' . , . WKU3*N+lI-HKllA*Nl *00000970 

C* HOLDS THE SINGLE STEP ERROR ESTIMATES *0Gu0J980 

C* HKlI3*N+IJ=Y(N*U-ll*II*H**K/IFACiaRIALlK-lI.*AlK»J *00000990 

C* WHERE K IS THE HIGHEST DERIVATIVE AVAILABLE. *QCOOIOOO 

C* . *00001010 

, C* WKJa^*N*l)-WRI 1<»*N+N**2J *00001020 

C* . USED FOR SIIFF HETHUUSI HTH=l,21 TO HULO JACOBIAN BY *00^01030 

C* COLUMNS. WK(N*a3*J)*l)=I0/DY( J) )OYl n .1^1. N Ji^l.N *00001090 

lt» *00001050 

C* JSTARTtAim INPUT/OUTPUT CODE USED AS FOLLOWS • *00001060 

C* *00001070 

C* -INPUT • . . . *OCJ01oa0 

C* .. . *00001090 

C* =-l REPEAT THE LAST STEP WITH A NEW H. *00001100 

C* - *00001110 

C* =0 PERFORM THE FIRST STEP- THE FIRST CALL MUSI ?E DONE *00001120 

C* . WITH THIS VALUE TO PERMIT PROPER INITI ALI2ATI0N. *00001130 

C* . . - *00001190 

C* - =+l take A NEW STEP CONTINUING FROM THE LAST. *0Cj011b0 

C* .... - *oC0uli60 

C* OUTPUT *00001170 

c* . . *0000 1 lao 

C* _ =N0 THE CURRENT ORDER OF THE INTEGRATION METHOD ON RETURN*OOOOll9Q 

C* ALSU, THE MAXIMUM DERIVATIVE AVAILABLE. *00001200 

t*- *00001210 

C* HMIN— THE MINIMUM STEP SI2E THAT WILL BE USED FOR THE *0C0O1220 

C* INTEGRATION. NOTE THAT ON STARTING HHIN MUST BE MUCH *00001230 

C* . SMALLER ISAV .125E-09I THAN THE AVERAGE H EXPECTED SINCE *00001290 

C* A FIRST ORDER MET+KJO IS USED INITIALLY. *00001250 

C* *00001260 

C* HMAX THE MAXIMUM STEP SUE THE USER HILL ALLOW. *00001270 

C* *00001280 


I 


»JCOCl<»CiJ 

»:!cooi/»io 



. c* 

=n 

c* 







. 




r-l 

c* 


r.* 

.. . . . 

, . 

--3 


-THF ERROR TEST CONSTANT- SINGLE STCP ERROR ESTIMATES ♦00001290 

Hi'IN*13<-II DIVIDED BY WK1N*12+M MUST BE LESS THAN EPS IN ♦00001300 
^THE EUCLIDEAN NORM. STEP AND/Qrt ORDER IS ADJUSTED TO *00001310 

ACHIEVE THIS ERROR BOUND. *30001320 

_ . *33^01330 

-THE METHOD INDICATOR- ♦3uJi/I3'*0 

♦CCO013S0 

=0 AN ADAMS PREOICTUH-CURRECTOR FOR NON-STIFF SYSTEHS. ♦300l-13()0 

♦5C331370 

♦ I A MDLTl-SrfcP METHOD FOR SIIFF SYSTEMS- IT wI.LL ALSU *jCC;013b0' 

nOjiK FOR nun-stiff SYSTEMS. A USER SUPPLIED ROUTINE *0C3O139J 

' PEDERV IS REQUIRED TO CALCULATE THI PARTIAL »0C0C1<»CD 

DERIVATIVES ( D/UY (J ) J DY I 11 . THAT IS. THE JACOBIAN. *3C001/»10 
. . ANOTHER USER SUPPLIED ROUTINE MATJNV IS PLDUIKEO TU ♦l;Ou01^20 

INVERT THE JACOBIAN. »3r001430 

♦3C301440 

= 2 THE SAME AS MTH^l EXCEPT THAT THE PARTIAL OER I VAT I VES* JCuJ 14i»0 . 
ARE CALCULATED IN DIfSJD BY N'JML-?ICAL Dl FF ERtNC 1 0 3 ♦00j014t>0 

AND HENCE PtDERV IS NUT CALLED. HOwEVI K A DUMMY ♦JC0U1470 

SlirUDUTlNE NAMED PEDERV SHlIULD »E SUPPLIED. MATINV IS^JOjOlABO 
.^IILL NLChSSARY ID INVLRT THE JACOBIAN. *QDo0i490 

♦OD001500 

-THE MAXIMUM ORDER INTEGRATION THE USER HiShES TO BE USED. *30301510, 
FOR NON-STIFF METHODS (MTH=01 IX ^US T SATISFY *30001520 

l-Oe.MAXDtR.LE.T AND FOR STIFF Fit THUDSI MTiU 1 ,2 ) IT MUST *30001530 
SATISFY I .GE.MAXUfcR.Le.6. *00001540 

*30301550 

-A COMPLETION CODE WITH THE FOLLOWING MEANINGS *00001560 

. *30331570 . 

= Fl THE STEP WAS SUCCESSFUL. ALL Hf-OUIREMENTS HERE MET. “OOJ015BO 

*00301590 

=-l THE step has TAKEN WITH h=KMIn; BUT, THE REQUESTED *00001600 
ERRJH, EPS. WAS NUT ACHIEVED. *'300Cloia 

*CGC01620 

.=rZ the maximum order SPECIFIED. MAXDER, HAS TOO LARGE. *30301630. 
OBSERVE THE CONSTRAINTS IN (HE DEFINITION OF MAXDER. *00301640 

*0000lo50 

=-3 CORRECTOR CONVERGENCE tUULO NOT BE ACHIEVED FOR *00001660 

h.CT.HMIN. *00001670 

♦00D016B0 

-•-4 THE KEOUESTEO ERROR IS SMALLER THAN CAN BE HANDLED *00001690 
FOR THE constraints PLACED ON IhE PARAMFIERS. EX AHINfc*3000l 700 
THE parameters TO DETERMINE IF SOME MAY HE RELAXED *00001710 


MAXDER 


lERR A COMPLETION CODE WITH THE FOLLOWING MEANINGS 


THE STEP HAS SUCCESSFUL. ALL Hf-OUIREMENTS HERE MET. 

the step has taken with h=kmin; but, the requested 

ERRJH, EPS. WAS NOT ACHIEVED. 


H.CT.HMIN. 



c* 

c* 
c« 
r> 
c* 
c» 
c«> 
r ^ 

i -• 

C4 

c* 

Cf 

Cfr 

c* 

c* 

c^ 

c« 

c* 

r.^ 

c* 

C^ 

c» 

c^= 

c* 

£:♦ 

c* 

c^ 

c* 

c* 


ANO try again. - '^00001720 

. , ^00001.730 

NOTES THE EuLLawiNG POINTS SHOULD BE KEPT IN HIND WHEN CHOOSING 4'DC00I74Q 
THE PARAMETERS, ^0C:i0l75O 

^3 Ol-^1 7gO 
*00001/70 
*00001 7b0 
*00001790 
*ocu0iaco 

*DU001tJl0 

*00001830 
*ODcOld^O 
♦00uGLB50 
*u000l860 


HIGHER JKfjfck fMFGKATrUNS IMAXDER) AND SMALL STEP SIZES 
tHJ REUIHRE '^lIkE CALCULAIIONS AND HENCE MORE TIME, BUT 

They result u better accuracy. 

SMALL E-<R(1R TOLERANCES ( EPSl REOUiRt HIGHER ORDER 
INTEGRATIONS ANU/(jR SMALLER STEP SIZE. 

THE USER SHOULD NUT ATTEMPT TO CHOOSE THE BEST STEP SIZE 
0»» RESTRICT THE UROER TO ATTEMPT AN OPTIMAL COMBINATION. 
AS MUCH AS POSSIBLEt SUCH OLCISIONS SHOULD BE LEFT TO 


DIFSUT. OIFSUH BASES ITS DECISIONS ON PRECISE CALCUL A T IONS^DuIjC 1 B70 


*occoiaao 

*003311190 

♦OOUC1900 

*30COl9iO 


KEOUIREO ROUTINES 

ALL OF THE fjlLOWlNG REOUlRED ROUTINES MUST RE SUPPLIED BY THE 
USER EVEN IF ONLY AS DUMMY SUBROUTINES. 

SUanuUIlNE DIFFUNI T.Y.UY) ... 


.ANU 'JPTIMIZES STEP SIZE AND OADLR TO ACHIEVE THE ERROR 
TOLERANCE WITH ECONOMICAL CALCULATIONS. 

> t M NECESSITY HAY REOUlRE SOME PARAMETERS TO BE 
C.-NSI-JAINFO; THUSE NOT CONSTRAINED SHOULD BE FREE TO VARY *300ul9ZO 
Ai MUCH AS PUSilBLL T3 PERMIT UIFSUU lU OPTIMIZE THEM. <'3C0C1930 

*00>j£)lyAQ 
•30JG19S0 
*30001960 
*30001970 
*30001900 
•00001990 
•J0C02000 
•DOOOZOIO 
•00302020 
•00002030 

Y — ARRAY OF DEPENDENT VARIABLES AND SCALED DERIVATIVES. *30002090 

THIS ARRAY IS THE SAME AS THE Y ARRAY FOR OlFSUB AND 15*00002050 

DIMENSIONtO THE SAME, . .. *00002000 

•00002070 
*00002080 
*00002090 

*00002100 

- . O'FFUN MUST ALWAYS BE SUPPLIED. IT COMPUTES THE OERlVAriVE*00002110 

Ol-.YIIl WITH RESPECT TO T. RETURNS IT IN DY.Ill TQ OlFSUB, *00002120 

- - ■ *00002130 

SUBROUTINE HATINV(PW,N*J) *00002190 


T — Independent variable 


OY-ARRAV OF DI HENS ION N WHICH HOLDS THE DERIVATIVES OF 
YIt>.l=l.N WITH RESPECT TO T. 


J... c^' 

c* 

C«' 

c* 

. c* 

-- . 

- 

... c^ 

CP 

c<= 

CP 

c*.^ 
c* 

_ CP 

L« 

CP.. 

CP 

CP 

CP 

CP 
CP 

. . c* 

„ CP 
CP 

_ c* , 
c* , 


PN-^RRAV CONTAINING THEJACOUlAN PASSED FRDH DlFSUB* 
I DIMENSIONED PW(N«N} 

^—r THE SIZE OF THE SYSTEM. 

J — RETURN CODE 




IF INVERSION OF PH SUCCESSFUL’ lOET ( PH) . NE. OJ . 

. IF INVERSION OF PW UNSUCCESSFUL lOETI PH)*EQ.D)* 


♦OOOOZlbO 
♦00002160 
♦QOU02170 
♦00002L80 
♦JOJ02190 
*00002200 
♦0C0022L0 
*00002220 
♦30J02230 
*000022^*0 
*aC002230 
*J0 jD22o0 

MATINV MUST BE PROVIDED FOR STIFF METHOD S ( M Tri= 1 1 2 ) HHILE *00002270 
ONLY A DUMMY SUBROUTINE IS NECESSARY FOR NUN-STlFF METHaL>S*000022c)0 
IMTH=01. MATINV INVERTS THE JACOBIAN AND RE lURNS THE *00002290 

INVERSE IN PH TO DIFSUB* *00302300 

. *00l.O2310- 

♦0C002320 
*00002310 

r -’ independent variable. *0CC0234D 

*00002350 

'Y--ARRAY OF DEPENDENT VARIABLES AND FIRST SEVEN *00002360 

^ .UIKIVATIVES. THIS ARRAY IS THE SAME AS THE Y ARRAY FOR *j 0U02370 
UlFSUi) AND IS DIMENSIONED THE.'SAME. 

.PH-ARRAY dimensioned N**2 CUNTAINING THE JACOBIAN BY 
COLUMNS. PHIN**2K 


SUBROUTINE PEQERVlT.y.PW.NJ 


♦OOC023BO 
*00^^02390 
♦00JJ24OO 
♦00JO241O 
*00002420 
*OCC02430^ 
•JL002440 

PEDERV MOST BE PROVIDED FOR STIFF METHODS I MTH= 1 1 2 1 HHlLE •OCE(j2'tbO 
.ONLY A DUMMY SUBKQUTINE IS REQUIRED FOR NDN-’STIFF METHODS *OQj02460 
_ (MTH=0). PEDERV COMPUTES THE PARTIAL DERiyATIVES OF OYtU *00002470 


JiL— JHE SIZE OF THE SYSTEM. 


l=ltN ANO STORES THEM BY COLUMNS IN 
.PHlN*iJ*l) + I) = lD/UyiJ) IDYUJ I = I*N . 


X* 

C* 

C* * AUT>JQR/ IMPLEMENTER 

C* . . 

C* . „S.fiAUOENDISTEL/G.W.HAlGLER 
LP . 

.LP LANQliAIlE 

CP 

C* FORTRAN 


THE FH ARRAY, 
J=LtN 


*00002480 

*30002490 

*00002500 

♦00002510 

*30002520 

♦00032530 

♦00002540 

♦D0DC2350 

*00002560 

♦00002570 


c* 

C=? OATS RELEASED 
C* * 

HAY 25t 1973 

C« - — . - 

C* LATEST REVISION 

HAY 25. 1973 


00017. 


)QUl7 


^aoooisao 

«O0UO259O 
«C0002600 
*30002610 
. . .. *ocao2tj2ci 

*00002630 
*00JG2Cj^0 

»00j02tj60 

♦ 0C002ci60. 

^ ♦ 9ti4i«O<»0C002670 

C _ _. . . .... . * J0J02t>60 

DIMENSION VI 1) .HKl XJ.AIBJ.PERTSTI 42J DCu02o90 

^ 0 L>0 2 700 

<:«*«« ?«*♦**•****♦*****♦*♦ ***00002 7 LO 
THE CUEFFICIENTS IN PERTST ARL USED IN SELECTINS THE STEP AND *00vJ2/J0 

C* IRDER. THErtEFORt ONLY ASQUI ONE PERCENT ACCURACY IS NEEOEU. *0001:2730 

0 ******** ** ***********^***fr**********c********«o*********OCL.0274Q 

*30 Ou 2750 

t*********** ******************•*********** + *******•**♦***♦**** ■>*******^*3C0u27ti0 
ct T US R.(« IS USED TO CALCULATE E FOR STIFF SYSTEMS *30002770 

. , *00002700 

DATA PERTST /2 .0 . A.b . 7.3 33 . 10.42 . 13 .7 . 17 . ISt I. Ot 00002790 

*********** ** ** ** * * ^ >************************* 0 OJ025 OQ 

C* THIS ROW IS USED TO CALCULATE E FUR ivJJN-’STlFF STYSTEHS *30002610 

*00302820 

1 2.0,1 2.0.24-0.37.89. 53,33* 70* Ob. 87.97. 0 0302 630 

Q******* ******************************* ******************* *»************0l 002840 
C* THIS ROW IS USED TO CALCULATE EUP FDR STIFF SYSTEMS «'0Cu0265O 

_C? . ♦00002860 

2 ' 3-0,6.0.9.167.12-5,15.98.1.0.1.0. OCJ02870 

(^* ** **** ******* ***************** ****************************** **********0 0o 32 38 2 

this row is used to CALCUALTE EUP FUR NUN-STIFF SYSTEMS ^00302890 

C* . <^00302900 

3 12.0.24.0.37*89.53. 33. 70.08.87.97. l.O, OOU029LO 

Q** * * ******* *** * ** ************** ** ** ************** ** * * ** **************** 3 C602 92 0 . 

. . C* THIS KQH IS USED TO CALCULATE EUWN FQK STIFF SYSTEMS ^00302930 

C* . ^ *00002940 

4 1., 1. *0.5.0.1667.0.04133.0.008267. l.O, 00002950 

f^*** *♦** ******************* ******************************* *♦ ****** ****** 0 0002 960 
L* THIS ROW IS USE!) TU CALCULATE EOWN FUR NUN-STIFF SYSTEMS *3CG02970 

C* *00002980 

5 1. 0. 1. G. 2. O.I.O.. 3157., 07407. .0139/ 00002990 

Q**** **************** ********************************************* ******0000 3000 





-OOOOl^ . data A12» ./ -l.O / 

000017 .. IR6T»i 

000017- IlrRR=l-U 

000020 -. IP(JSrART.LE.O)COTO 25 



C* BEGiN BY SAVING INFORMATION FOR POSSIBLE RESTARTS AND CHANGING 

C* H EY THE FACTOR R IF THE CALLER HAS ChANGEU H. ALL VARIABLES 

C* OEPENDENT ON H MUST ALSU BE CHANGED. 

C<= HNFW IS THE STEP SIZE THAT HAS USED ON THE LAST CALL- 


00003010 
OC. J2020 
0000iij30 
300030^0 
J5 J . 
^ 0 000 3 OoO 
«0OJO3O/O 
<*00003000 
♦OOUOOOLO 
«^t«<ne.;fi0C000o20 


ILQim22 

000025 
00QD26„ 
000033- — 
00003<* 
000036- 

OQ003Z 

OOOO^L . 
000041 . 


5 NM=N<'!C 

□0 10 i^i*m 
10 wKii ^“Yin 
HDLD=HNFW 

IFiH.eO.HOLOiGQTD 20 
15 RACUM-H/KQLO 

1RET1 = 1. 

onia 415 

23 NOMlQ-rJO . . 


0CCCo030 

00000040 

OCl.00050 

0r;j3DJ60 

oocooo/o 

QOOOJObO 

0000^0*50 

OCOOOldO 

Oi/vLf J 110 


(.!DD 04 ? 

rni t 



OCOJv i 20 

Ct:i 

KAUP'-I' 1 ^ 



00000130 

onoD'iS .. 

IF( JSTARI.Gr.DIGDTO 170 



OuL'Odl 4 0 

0 D 0 a 47 _ 

GOTO 55 . . 

. ^ ., . ^ _ __., 



00000130 

OOOJ 47 

25 IFIJSrART.eO.-DGQTO 5 f> 

* 


00000160 


«iCn>4i##^<tOC33LrI 70 

. C* ilN THE FIRST AND ANY SUBSEQUENT CALL WITH JST ART-0* THE ORDER IS <?OCOOOltJO 

_J. C« SET TU I AND THE INITIAL DERIVATIVES ARE CALCULATED. ARRAY ACCESS <^00000190 

C« CONSTANTS ARE CALCULATED AND ARRAYS Y*WK ARE ZEROED OR INITIALIZED <*J0uDO2OO 




DQ0O5U .. 

NO=I 


C000022Q 

0D005L 

Nft-N4a 


00a03230 

aDDQ53-.. 

N9=^N64-N 


00000240 

0QQ054 

NLO-N'J^^N 


00UQ0250 

D0D055 

N11-N104-N 

i 

DOQOUZ60 

anftn<iA 

N12-NLli*N 


CCC00270. 

Q0Q057 

N13-NL21-N 


OU00026Q 

30D060 

NIA^NIS^-N 


OOJOC290 

D0QQ61 

. NlOPl=NlQfl . , 


00000300 

300063 

. NllPl-NlIfl 


00000310 

300065 - . 

, N14P1-N14H . . 


00000320 


NM=rO*MMf 141 _ 


00000330 

300071— 

. 00 30 1 = 1. NN *.. . 


00000340 

3Q0073 

30 HKI I J = 0. .. 


00000350 


000077- 

' 

NN=N«-1- 




000Q03i.0 

OOOIOO 


DO 35 I?iMN.N8 




00000370 

000 101 - 

35 

Y1 11=0. 




00000380 

000105 . - 


OLi 40 I°1*N 




00000390 

-000106 — . 

40 

WK(NI2l^UsAMAXUl.*ABS(Y< liJt-. 

^ - .. . — - 

... 

. 

. - 0O0CO4O0 

OOOlEi . 


CALL DlfFUNI T.Y.WK(NIOPI)} 




OOOOU410 

Q0C125 


on 45 1=1, N 




00000420 

00J132 

A ti 

YIN«-1J=WK<N10<-U#H 

. 



00000430 

. 000L41 -- 






OCC00440 

000141. - 


K=2 




00000450 

..DQ0143 


GOTO 5 




0000 0460 




C* HEPBAT LAST STEP BY RESTURING SAVED iNfORMATIOM- <^eOLOiJ<rkJO 

(; 41 « $ « $ «;<; <c<t* W*J^$** * J?:« <1* « *& $ **0«Sir«»*<t»ert«fr«ii^^«CCuOO^9O 


_DQD143 _ 

0001 ^^ 

^UOQIAZ 

.ooDisa . . 
.000152 


50 lP^^iQ-Ea-N0□L0JJ5TARr = l 
T=TOLO 

. . NQ=NOaLO. 

K=NOtl 
GO Til 15 


OCJ00500 
00000510 
00^00520 
0OJ0O5 jO 
00000540 




SEX THE CUErPSLlENTS THAT OETERMII^E THE ORDER AMO THE METHOD 
C* TYTE* CHECK FOR EXCESSIVE ORDER* THE LAST TWU STATEHEr^TS Or 
C* THIS SECTiUM SET iWEVAL *GT.O IF THE JACORIAN IS TO BE RE- 
C* EVALUATED BECAUSE OF THE ORDER CKANGE* AUiJ THEM REPEAT THE 
C* INTEGRATION STEP IF IT HAS NOT YCT BEEN DUNE URET-l) OR SKIP TO A 
C* FINAL scaling BFFURE EXIT IF IT HAS BEEN COMPLETED URET^Zl* 


♦ GOOD j5t>0 

*00000570 

*00000500. 

<=0000 J5yo 

*00000600 

* 0000u6l0 


************************ *** *********************** ***0 G000b2 0 


^00153 

.000155 

00DL57 
000162 -. 
000165 
.000170 _ 
J)00173 . 

.Q00J.76 

.000200 . 

OOD2Q2 - 


55 IFlMTH.E0*0)G0T0 70 
. IFlN0‘-2U30tI35»60 
60 !FtM0-4U40tl45,65 
65 IF I NQ~ 6) 150* 155,90 
70 lFINa-2)95tliO,75 
75 IFlNO - 4n05tL10.aO 
80 IFtNQ-61115, 120,85 
85. IFIM0*E04.7)GCJT0 125 
90 IERR=!-2 
RETURN 


00000630 
00000640 
OG00065D 
OOG00660 
00000670 
GOQ00680 
00000690 
00000 700 
00000710 
OCOG072O 


Q* ********** **** *********************** ************** *** ***********6****00000730 


THE FULLOWING COEFFICIENTS SHOULD BE DEF INED TtJ THE MAXIMUM *00000740 

C* ACCURACY PERMITTED 6Y THE MACHINE. THEY ARE. IN THE ORDER USED^. . *00000750 

C* _ *00000760 

. _C* THE FOLLOWING ARE FOR NON«STIFF METHODS *00000770 

C* *00000780 






w 



•- C* wt . ^ 

i/f -i/z.-i/k . 

^3/d.-il/J2.-i/3.-l/2* 

G* -251/720. -2i/^^,-35/72.-5/46«-t/l20 - 

- -95/208 . - i37/ X2 0.-5>B 17/9 6i -1/90.-1/720 

19087/60480.-99/90.-203/270.-99/192.-7/149.-7/1990.-1/5040 

C* THE following ARE FOR STIFF HETHOOS 
CO 

. CO -1. .... ..... . , . . . .... .. . 

c*. 
c* 



. 

. G« - 

' ^ ■ . 



G« - 

I-'-* 


■ ^ > 

- 

r '7 



“r 


2/3.-1/3 

6/1U-6/IU-1/U 
GO -I2/25*-7/t0t-l/5.-l/60 ' 

CO - 120/274.-225/279.-85/279, “15/279. -1/279 
C O - 18 0/ 991 . -i53/ 63 , - IS / 3 6. -25/252 . - 3 / 252 . -1 / 1 769 


000000790 

*00000800 

O00000810 

*00000620 

*30000830. 

*G0u00B9Q 

*00000650 

*00000660 

*C00C0870 

*OOCi,J830. 

*oocuoa90 

*ooc ooyco 

*00000910 

♦OOOU0920 

*00000930 

*ODJD.0990 


.C*************** ********** *****************************3^**** ************06063950 


_0.b0202_ 

„ 000209 .. 
_.Qb020ft„. 

0Q0205- 
.. 000207 .. 

Q002QZ 

_ 000210;. 

_0002i2_.. 

-060219,...^ 

. 000219— 
_cfoa2is.:__ 

—00021 2. 

-06022Qw^ 

_D00222;_ 
_000223_ 
_0(lb229— ... 
„DD0^26 „ 
_XtDa22Z_... 


95 Ain = -1.0 
GCITn 1 60 

100 All) = -0.50COOOOOO 
At 31 - -0.500000000 
GOTO 160 

105 . Atli = -0.9166666666666667 . 
AI 31 - -b. 750000000 
A(9i 3 -0. 1666666666666667 
GOTO 160 . . . 

110 At n = -0.375000000 

..JVt33 = -0.9166666666666667 

..:At97.=*.r0.333333333333333 . 

. V At5) * — 0.091b6a6666’6666667 
GOTO 160 

AIll = r0.398611LlllMUll 
At 31 * -1.0916666666666667 
A(9) = -Q.9861U11111111U 
JU5:L_9_rO. 1091666666666667 
At6i = -0.008333333333333333 
160 

= -0.3298611111111111 
= .-1.1916666666666667 
= -0.625000000 


U5 


. 00023 1„. . , 

.000233— ' GOTO 

,000233. ... 120 All) 

^.000239 _ ... At 3) 

- 000236 _ AI9» 

-000231. _JU5) j»„-0. 1770833333333333 - 

000291 At 6) 6 -0.0250000000 

000292.- .. . - At 7) . 2 -0.001388888088888889 


0QGC0960 
00J0O97O 
00000980 
00000990 
OOOOIGUQ 
OOOOlOlO 
0 COO 10 20 

ooooioio: 

00001090 
aoooioSQ 
a 000 1060 : 

00001070. 

00001080 

0 0001090 

00001 100 

aoooiuo 

00001120 

0.000113.0- 

0000 U90 

00001150 

00001160 

DODD 1170 

ocoanflo 

DCaoiiao 

0C0012OQ 

000012X0 


r 




-'.-■.a., 




000?44 
000?45 
000246 
0D025O . 
OtlQifit.- 
0002 53 
0002 S4 
000256 - 
066266 
000260 
.000262^ 
000262 
000263 
0 00266 . 
000266 
000267 • 
Q0027ju^ 
000273 . . 
000273 
000274 
030276 . 
000277. 
.000301 _ 
030302- 
030303 
000305 
0QQ3D6 : 
.000310 - 
:00031iL_ 
000312. 
000313 
000315 
000316- 
000320 - 
000321 .. 
000323 
000325 


000326._ 

000327.,. 

000332 


, .0070 l60 

125 At 1 i .-0. 31559 19312169312 
At 31 = -1.235000000 
A147 - -0.75iB5l'tt5i85185'i9 
; , , At SI. sf -0.25 52083333333333 . 

At 61 * -0.04861111111111111 
At 7 } = -0 - OO 48611 1 1 1 11 Him 
AC 81 ? -0.0001984126984126984 
GOTO 160 

130 AC II =5 ^i.ocoooOooo 
_ - GOTO I6d . ‘ 

135 At II ? ^0. 6666666666666667 
At3J= ^0*3333333333333333 
Goid 160; 

'140 At 11 = 40.5454545454545455 

■ ■::TA(3T.''».:Ailf 

- ; At 41 = 40. o9o909Q9090909091 

. GOTO 160 

145 AMI = -0.4HOOOOOOO 

: At V> s r-O. /OilOOOODO 

AI41 = -J.2OOOOQ0OO 
AI51= -0.020000000 

. GlJia 160 . 

ISO At II = -0.43 7956204379562 

At 31 v= -0.8211678832116788 

A(4J = -0.3102189781021898 
AC51;- 054744525547^4526 

A(6> = -0.0036496350364963504 

:.GOTO. 160 . 

155 Atil = -0.4031632653061225 • 

At 31 = -0.92 063492 C6349206 , 

At4» = -0.4166666666666667 
AtSi = -0^0992063492063492 
At6l= “0.0119047619047619 

At 7) = -0.00'j566D93424036Z82 . 

160 K=ilO+l 


00001220 
00001230 
00001240 
0 0001250 
OCC01260 
00001270 
00001280 
00001290 
00001300' 
OC031310 
0OC01320 
0C0CU30 
0000 1340 
0CC0135O 
0 GOO 1360 
00001370 
0CJU136O 
00001390 
00001400 
00001410 
00001420 
00001430 
00001440 
0 cool 45 U 
0OCO146O 
O00Q1470 
00001480 
:OCO''-4490 

ooooisoo 

odcoisio 

00001520 

00001530 

0OCO154O 

00001550 

DC0D156Q. 

00001570 


100US=^K , 00001580 


'iTVP=l FOR STIFf HETHOOS AND HTYP=2 FOR NON-STIFF METHODS *00001600 


;.Myp=l 

IFt MTH -EOi 0 ) HTVP=2 
;eDhli=NQ 


00001620 

00001630 

06001640 


:-TV. 




;■ C 

■^ 0033 t:. 
^.000335 
^000341 , 


uaao 342 _ 

^ 000353 ^ 

^ 00355 .. . 

^, 0 dQ 35 l.. 

-^ 000360 .^ 

1 :^^X 10363 ^-: 

_Old 0364 .. 




aMQ 3 ^*Vt£ 0 WNf- 2 .l 

VL=: 7 #XMTYP-U>NQ 


OOOOlbbO 

0000L660 

00001670 

000016UO 


C* E IS A C0MPAKI50M FDR ERRORS OF THE CURRENT ORDER NO. EUP IS ♦DOjDlTOO 

CO TD test for increasing the DRDER. EOHN for decreasing the order. ^ODQDlTiO 

EPlpeRTSTlLi^EPSW ' 00001730 

- EUP=CP£RTSUI.+14J<'EPS>«'<‘2 00001740 

...... 4..-F0WN=tPEaTSTiL+28J*£PSJ+ . 00001750 

IFIEDWNiEO.O.JGOTD 430 00001760 

, „ eM0=EPS«EN03/N • 00001770 

— 165 IWEVAL.=MTH 000017BO 

iiFnRET.GT.l tGUTD 380 00001790' 

'c« THIS SECT IdN COMPUTES THE PREDICTED VALUES BY EFFECTIVELY. KOGOOifllO.. 

C# M’ILTIPLYING THE SAVED INFORHATIDN BY THE PASCAL TRIANGLE MATRIX *DGsj01B20 


01001040 
00001850 
0000 I 860 
00001 870 
0pC0l880 
00001890 
Q0001900 
00001910 
00001920 


■,Jiil0370„. 173 T=T<rH 

.booa7t_- i.-N*ti<-n 

_JifiQ37Ji- 00 175 J=2.K 

_ja&b3I6u . NN=L... 

w.000400^. on 175 J1=J.K 

: _0004ai . NN=NN-N 

_Q0Q4Q3^ .. 00 l?5.l=l.N 

-_b{l04D’4 NT=NNtI : 

! -jOpOftaS^.-. 175 YlNTjlrYlNTUVINTtNl 

«4*«4**«4i4''»««(>*«'DC0D193O . 

.:' ■ UP TO 3 GORReeTUR ITERATIONS ARE TAKEN. CONVERGENCE IS TESTED BY ^00001940 

/ RFOilIRING CHANGES TO BE LESS THAN BND WHICH IS DEPENDENT ON THE 

.. r» ERROR TEST CONSTANT* THE SUM OF THE CORRECTIONS IS ACCUMULATED IN 

e-^ THE array #.(N13MI. it is equal to the K-TH DERIVATIVE OF V 

. : ■ - ^ . ■■.- ^ c.* HULTIPLIEO by H**Ky <FACTQRlALlK-l l*AlKJIt* ANi) IS PROPURTlQNAl TO 

- ■ ■:■■- ■ r # THE-ACTUAL ERRORS TO THE LOWEST POWER OF H PRESENT. IH^+Kl . 

C^i^^t,^!ti^iti^p.v*if**Xf****#l!f**»:******ti* 0 ***!t/i^*«^** 9 ^**‘******^i^***^i^******if*i^**i 3 OOOZOOa 

on lao i-i.N 0000201b 

IBO WKIN13>1J=0. 00002020 

.Uafl42L— DO 260 L»l.3 00002030 

0b043b:._ CALL DlFFUNIT.Y»UKtN10Pm 90002040 

IF THERE HAS BEE.N A CHANCE OF ORDER DR THERE HAS BEEN TROUBLE «90002060 

WITH CONVERGENCE. THE JACOBIAN IS RE-EVALUATED PRIOR TO STARTING *00002070 


_dlib 42 a.„ 

„ 0 OO. 422 . 


«0 000 1950 
«0 0001 960 
«D 000 1970 
*00001980 
*00001990. 



; ( 

• i 
ti ■ 










• _ Cf the CoaRCCTOR 

Qf THEN SET TO ~ 


Iteration in the case of stiff hethoos, 
1 AS AN indicator that it HAS SEEN DONE. 


iheval is 


4:00002080 

*00002090 


JL000434;.. TFIlMEVAULT.DGGTa 220 

nnf>4 42 ..IECMTH-EQ.SJGQTQ 200 

a_Q0Q44i^^ . CAU PE0£RV(T.Y,WK(N14PU*N1 

X.0rt0452 _ R=AU1*H 

_ OonAS T . . NN=N*N 
ill,00046l ^ - DO IBS I=l«NN 

000463 ; „ 185 WKINl4«-tl=WA (N141-I } *R 


00002110 
- 00002120 
00002130 
00002140 
QCC02150 
OCO021OO 
00002170 


£*****<‘,**«(**4t4****4t**V<:*4i**4t*<t*4>#:>9!***««!***<‘*ft#«*****-******+4'4:*#**<'**<»**a 00021B0 

.. . ... CF* ADD THE IDENTITY MATRIX TO THE JACOBIAN AND INVERT *00002190 


_OOb4Tl_ 

OQDAT^ 

;.Mo4t4_ 

i^0fi0476 

. 000300 

U,bOC3QS_.. 

;.000S06;.. 

000514- . - 
,400522., 


.DOC42Z. 


... 190 NN^^NIS . . 00002210 

Jl-N+l- . 0C00222U 

no 195 1=1. N 00002230 

,NN=NNfJl - 00002240. 

. 195;HK(NNJ*1:.«-MK(NN1 ‘ 00002250 

, IHt:VAL=-l 00002260 

CALC r,ATINV(wKIN14Pll.N.JIl OC002270 

IF( Ji.frT.OlGOIQ 220 00002280 

Goto 265 30002290 

£:(■ <i* *<.i(^ij!<;<!»4«44«*!(i*»*#iOi4:********<t***** ***♦**♦♦*♦*♦♦*****»*# *«<*****:^**# *00002300 
C* FVAUJATE IHE JACOBIAN BY NUMERICAL DIFFERENCING. R IS THE CHANGE ♦30002310 
C* MADE TO THE SLEMENT OF V. IT IS EPS RELATIVE TO Y WITH A HINIMUH OF ♦30002320 
C* EPS**2 *00002330 

Q*««l«C««4c»«««4i4«*****«*»****«««««>*******4:«>«>*4:*******<t**«*»*«***«*»«**At!«3C002340 
200 DO 205 1=1 »N 30002350 


U.D0052&- 205 NR I NB F J J=Y 1 1 1. . . . . 

::.090532 J1=N13 

000533 DO 215 J=1.N 

.000535— R=EPSFAMAXl(EPS.ABS(MKlNSFjm 

. 000544. YIJI=Y(J1*R 
Q00S4T , . D=AI1J*H/R 

.000551 CALL OIFFUNIT.YrMKINllPllI . . 

0Q0556 - - . J1=JH-N 

0QQS63 . 00 210 1=1 .N 

000365. „ NN=J1+I 

-0005&& — . 210 UKINNI =(WKIN11FI}>-WKIN104I1J*D 

000602 215 YU>=WK(N8*J1 

6006l0_J GOTO 190 

000610.;-.. 220 IF CMTU.NE.aiGOTQ 230 

.000612 DO 225 1=1, N 


0Q002360 

00302370 

000U2380 

00002390 

00002400 

00002410 

30002420. 

00002430 

00pu2440 

000024^0 

00002460 

00002470 

00002480 

00002490 

0COi:23OO 


-000611. 

> 000625 . 

■ 000625 .^. . 
_000627 - 

^000642_. 

000643 , . 
1 000649 „ 
L.00a44o- 
000647 
UQ^Qh51^^ 
^ 000664 


00002510 

00002520 

OC00253C 

OCJ02540 

OG002550 

000025o0 

OOOk .2570 

00002580 

O0DO259O 

00002600 ' 

jOOOZdIO 

00002620 


_ OQ 066 S ^ 


.... OD 0 ; a 6 Z .-.- 

000674.* 

000701, 

000705 

OODiU ;.. 

^ 000722 — 


00 0723- 


225 m(W04.n-ViN^I J-WKiNIOHUH 
GOTO 250 
. 230 DO 235 

235 WKINXH^n-Y(W’i'n“WKfMU>i^t)*K 

00 245 = ^ - - 

0=0. 

NN=N13’M 
DO 240 J=lirN 
NN=NNfN 

240 D=f)i^vm(NNi^WKtNll+Ji 

245 

251 NT=M 

CnRRFCT ANP SEE IF ALL CHANGES AKE LESS THAN 3ND RELATIVE TO «>00CO264O 

C<* WKiNl2i-iK IF SU* THE CORRECTOR iS SAID TO HAVE CONVERGED* *00Du2650 

.. - „0a 255 I=l*N . _ - JCL02670 

vni-yi ntAa)*wRtN8f-n joooautiQ 

VI N^l )=Y(NH l-WR iN8+I i 00002oV0 

WKIMl+^D^^riinXl-lJfrHKtNa^n ‘ JCm.D27CO 

lF(At>5 li^Kli**Util .LEp8ND»WK(Nl2l'I)lNr=NT-l OG002710 

255 CONMNUE DC0U272O 

IFiNf-LE.OIGOTO 285 . . - 00002730 

260 ■ONTINIJF . : 30002740 

U THE CfiRRFCTllR ITERATION FAILED TO CONVERGE IN 3 TRIES* VARIOUS «UC002760 

C4 PflSSTBlLITIES ARE CHECKED FOR. IF H IS ALREADY HHIN AND THIS IS ♦00J027/Q 

EtTHER ADAMS METHOD OR THE STIFF METHOD IN IJHICH THE JACOBIAN HAS *30002780 
X* -ALREADY BEEN R£- EVAL jATEDi A ND CONVERGENCE EXIT IS TAlCFN. 


C* OTHERWISE THE JAGOHiAN IS RE-EVALUATEO AND/OR THE STEP IS, RFOUGEO 
C* TO TRY AND GET COi^iVERGENCE- 
C ^ 9 « < r « » «« « « « ^ 0 «*« « <( « « i 4 c 4 «« :«!« I ( t « » ^ «t * » * ^ « 0 0 0 0 2 82 D 


*00002790 

* OC 0020 uO 

*00002010 


^Q07£5L-*- 

_ 0007 a 6 _ . 

■1^ A ( I P 7 4 3—r -» 

„ OQ0752*— 
i, OQdisa., _. 
..,0QQ753-_ 
-iJObTSSL — 

. OQ0757 - . 

_ D0Q762-. 

000763-, 
QOdTTd . 


2631= TOLD 

tF (H*Le.HKIN#l.DOOOl.ANO.t IMEVAL-MTVPl .LT.-llGOTO 270 

-LF(3IH^Ea.0.0ft«luEVAL.NE«0)RACUMaRACUH«.23 - 

I«EVAL=HTH 
lftEn«2 
^OQTD 415 
270 IERRa-3 
2 TS Nto - N+K 

00 280 .1-l.MN - . - . - 

280 VnisriKM ) 

H=tlOLO - 










00002830 

00002840 

00JU2830 . 

30002860 

0C002U70 

000028QO 

00002890 

00002900 

00032910 

00002920 

00002930 


II 

h 

H 
; ! 
f i 






OOOTTil— 

000772 

-0Q0772 


010077^- 
—000775 . 
—OQMZl.: — 
^Doioia:^ 
-ooioio — 
\_DOiOl4 


' NO^NOOLD — 000029^0 

JSTART^NO 00002.950 

ftBTUBN ” ~ ' 30002960 

.c<f THE COKRECTan. CONVERGED ANO CONTROL IS PASSED TO STATEHEMT 300 =^00002980 

C* IF THE ERROR TEST rs O.K.. AND TO 310 OTHERWISE. *3000 990 

C* IF THE STEP IS O.K; IT IS ACCEPTfcO- IF IDUUIJ HAS 3EEN REDUCEO *00^03000 

C* TO ONE. A TEST IS HADE TO SEE IF THE STEP CAN BE INCREASED *00003010 

C* AT THE CURRENT ORDER DR BY GOING TO OVE HIGHER OH ONE LOWER. *00033020 

C* SUCH A chance IS ONLY MADE IF THE STEP CAN BE INCREASED BY AI *00303030 

-C* LEAST 1.1. IF MO CHANGE IS POSSiaLE lOOUB IS SEX TO 10 lU — *00u033/.3 

C* PREVENT FUTHER testing FOR. 10 STEPS. *000u3350 

C* Ip A change IS POSSIBLE. IT IS MADE ANO lOQOB IS SET TO *00303360 

C* NO * 1 To PREVENT FURTHER lESING FOR THAT NUMBER OF STEPS. *00033070 

C* IF: THE FRROR WAS TOD LARGE. THE OPTIMJH STEP SIZE FOR THIS OR *3Cu03JU0 

C* LOWER ORDER IS eOMPUTED, ANO THE STEP RETRIEO. IF IT SHOULD *00003090 

C* FAIL, TWICE MORE IT IS AN INOICATION THAT THE DERIVATIVES THAT . ... *00303130 

C* rlAVE ACCUMULATEO IN THE Y ARRAY HAVE ERROhS OF THE WRUNG UHOER *30033110 

C* SlT THE FIR.ST DERiVATlVES ARE RECOMPUTED AND THE ORDER IS SET TO I. *30303120 

2dS D-O. OOOuaiA^O 

on 290 l^liiN 00333150 

29Q 0=DHWKtN13ttl/WRlNl2*in**2. . . . ... .. OC303160 

fWEVAL«0 ■ '■ 0 0003170 

iFrD.r>T.£)GLiro 310 0000318O 

rFtKi,LT.31G0T0 300 00003190 

L***^:**A«'‘<.******** ************************************************* *****0000 3200 
C* CONPLFTF THE CORRECTION OF THE HIGHER ORDER DERIVATIVES AFTER A *00303210 

C* SUCCeSPUL .STEP, . . . . .. *00003220. 

Q******i***::{t*******.*******!igt*«*4r***************«** ***!****«*«****«* ********3 0003230 


-0Q1016_ L*N 

.00ii0l74 0» 295 J=3,K 

-001020 - L=L*N 

„ 001022 00 295 I=1.N 

nn i in>TL _ NN=L*I ... ... 

-001024 _ - 2 95 Yt NNl = Yl NN I *AI 3 ) *UK( N13 * 1 1 

- 001037 . _ TOO IFRR*Fl 

-001040:. HNEW*H 

-OOtOAL^ iFIlDaOB.LE.lJGDTa 315 

001044 - lOOUBsIOOUB-^1 

001045— lFIlUUUB..6T.ilGQTd 390..... 

001050 00 305 I=1.M . 

-OOioSt . 305 WK{N9m=MKINl3*Il 


00303240 

0C0O3250 

00003260 

00003270 

000032UO 

0C00329O 

OC003300 

00003310 

00003320 

00003330 

00003340 

00003350 

00Q03360 


_00i06a-L GOTO 390- 00003370 

^ ^ . c<‘***#^^*#*i'*i<''*‘*'!'#************<^**’!'*fi*’S‘=S‘***^**!t'+*«'*<’<'<‘*+****+*1'* 'i'^'♦#^‘#^)'^000033a0 

. CO REOtiCE THS failure FLAG COUhlT TO CHECK FOR MULTIPLE FAILURES. *00003390 

.1. CO RESTORE t to ITS ORIGINAL VALUE AND TRY AGAIN UNLESS THERE HAVE *00003400 

w., — — C* three, failures. in that case the OERVAT IVES are assumed TO HAVE *30003410 

C* AC COHULATEtl ERRORS SO A RESTART FROM THE CURRENT VALUES OF V IS *00003420 

C* TRliO. *00003430 

C*****:*, *********************** ************************************<i>4(****00003‘«'40 
310 iERR*rERR-2 • 00003450 

IFCH.LE.HHlN*l.D0001I60ro 410 00003460 

. . ..-I*T0LD .. . . 0 0003470 

IF(IERR.LE.^5)GUTa 400 000034EO 

C*************** ********************************** «****4r*4t**************Ggooi490 
C* PRl» PR2t Af ID PR 3 HILL contain THE AHnUNIS 8Y WHICH THE STEP ElZE *00u03500 

C* SHOULD 6E OlVIDlb AT OROEK ONE LOWER* AT THIS ORDER* AND AT ORDER *00003510 

C* ONE HIGHER RESPECTimV* *00003520 

C*********** *********************♦****************' ************«*^^*****«0DQ0353Q 


^OOIOAQl^- 
!_DD1QA2_- 
nninft A 

OlROiOAX— 


-OiaLDXi — 315 PR2-f0/ei**EN02»1.2 

-ODLOXfil PR3=1.E*20 

.jQDIIdOL {FINO.GE.MAXUER*OR.IERR.LE.-nGOTO 325 

OQUIR. 13=0. 

iJJDill3_ . OD 320 UltN 

320 . 0=D*liWK I'N13+I 1 tUK f MQ* III /WKI NL2*li I **2 

L.0dIi3Q„. PR3=t0/E0Pl**EN03*1.4 . 

i00Li35;_„ 325 PRl=,l.EF20 
i^OaiLseu.*,- . TFINtl-LE.l)GDTa.335 
20dlI4l-^. 0=0. 

.0QAL4R; .. . . NN=N*tK-lI 

w001L4S.m dd 330 _L=1 ,14- 

.JJDU4RW... . NN=NNtl 
aflbllSd;-, . 330 0=U+IYtNN»/MKiNL2*nj**2 

-OOltSTL— PRl=I0/ebhNJ**ENQl*1.3 

iOfftlAC---. 335 CONTINUE 
_0dtl64.^ . . lFIPR2.LE.PR31GaT0 365 

:-d01.I6t^-. — IFIPR3.LT.PR11G0T0 37C 


;ddll7L- 
401176--. 
idOiaOd - 
00120 1 ._;. 
iOoiaia^ . 


340 R= l./AHAXl tPRl . l.E-041 
*. NEW0=NQ-1 
345 IDHUD=10 

. IF(IERR.Ep.l.ANO.R.LT.l.l}GOTa 390 
IF C NEWO.LE .NOlGDTd 355 

O********* *************************#«t*******<i*4e«:»«t**^t************#****3000377Q 

C* COMPUlc one AOUITIONAL SCALED DERIVATIVE IF ORDER IS INCREASEO. *000037110 

C***********«***************************#*******************************0000379l1 


00003540 

00303550 

OOOOiSbO 

00003570 

00003500 

00003590 

00003600 

00003610 

00003620 

00003630 

00U03640 

00003650 

3 C003660 

00003670 

00003660 

00003690 

0000:^700 

00003710. 

00003720 

00003730 

00003740 

00003750 

00003760 




0012J5 NN=NEHO*N" . . 

001217 on 3S0 J=1.N 

i'00 ta2;l 

. 001223 isa Y{f4Nl=WKIN13tIJ*ft(KJ/K 

^OPl233-j- 3S5^K=^ja^^l-^l : : .. .,. - 

.1001235 r lFllliR.eo*l)GaTO 375 

■001237 RAC|JM=4H'ACuM<‘R 

- 00 j2‘«o iaFirr-'3 : 

JOatij^l . OOTO *415 . . ^ 

700124:2... 360 if(WHiiO.EO*WOlGDTQ 170 

Jioom^--.:. ■ 

r00l245.. . r.OT.11 55 . . ■. • 

. 0141245 , 36li IF< RR2 .GT-fiRlI GOtO 340 

.5001251 . . . . NfeHO=NO 

/(ftl25i : R=W4liAXU^^ 

_“>SI>t256 * -. GOTO 345 

.,Jif0l2ST-_ — - - 

JBBliili..., .. -i: NEhQiNiJ^l. ■ 

J3>«12B6.' ■• • r.flT0'.3.45, 

001267 375: IRfeT^? 

001270 RMriINitli*HflAX/*A8SIHlJ , 

J06i275i. • ' 

-.601276.W, . ■ ■■■■ HN&W-rt:., . .■i . ... 

..*6&i216:. : IFlSO^^^feOwNEbOlGaTO 380 

..doi30l - : . N0=NBWO ... 

- d0130i_ . GOTO .5:5 . .... 

_061362 3«0 RliU .. .-... . 

_001305'..-. . ■ -' 1=0..'''..:-- - . .. 

„00i305. — . 00;..3a5..J?!2.ilC-.-i.-.- -.V. 

.. Q01305W l'- .■'■.■ ■ 

_D6131A.— . iak.'FN . 

_Q013U ;,.. .. DO 3a5«l=l,N ■ .r:.-.. ' • 

_001313 . .NN=L+;t;., . . .. . ■.■■■-.■ .^.■. 

„001314;,_.,. 385 YtNIJ)=rtNNi*Rl 

_|Jol323£_-...-..- _lbOUa»K ; 

„Q0i324_ . - . 390 DO 395 I“l ,N 

^jDOl320i-_. - 395 WK ( N12 f1» «AHAXU WKTN12«-1 1 » ABS (Yl 1 } 1 J 
„001340._^: JSTART*N0 

..001341 . RETURN 

001342 

.O0l344>.._4. -.-CALI OlFFUNlT.yiOKTfllOPlJl . 

001351 __ R=H/H0I.P 

. 001357 00 405 1=1. N 


00003600 
ooeo36iq 
30003820 
0000 3 830 
0OU03840 
0000385,0 
00003860 
0CO0367O 
00003860 
00003890 
00303VO0 
ecoojyio 

J 00 03 920 
0 0003930 
J 0003940 
00QOJ950 
00003960 
00003970 
00003980 
00003990 
O0004OD0 
OG004010 
0000402Q 
G 0004030 
00004040 
00004050 
0CG0406Q 
0OG04O70 
,20004080 
00004090 
00004 ICO 
00004110 
00004120 
00004130 
O0J0414Q 
00004150 
00004160 
00GO4170 
OC004180 
0C004190 
000042U0 
00004210 
0C0G4220 


.v>Y( „ - — 

.^J)i}i363. — :,NN=«+i .;. 

i_00i563,u. ■ . ViiaNW) >^ holo<«^k t«XO*Il. 

-_dbl370 .. /tOSi VtNNisHKtNM) *R 


i_00i3r6l— : i ; 1EHR=+ 1 

i^J3.0i^00 L .. ; GOTU 5S 

L..00140il:_.. 410 lEKR=-r 

.i„dOl4DR;:... HNEW^'H . 

_ 001403.™ . JSTARTaNO 

’ >-..QQ;l40 5;^—.. ■ ■ - . . KE ItiRN .4 . .. 

, Ci‘R*44''**4#J^#*R**4!(e4f4i^*^**4*«t**#^;M‘**##:*i(f#*#***#*** ♦♦♦♦♦?»**#fr300u4340 
C4 THIS SECflONSGALESAU VARIABLES COPWECTEO WITH H AWd aErURNS *00004350 

...C4 Tn THE ENTERING SECTION. ♦0C004360 

. . C**«**********4***#44****4**<‘>l'4‘l<^'*>t!*<'>t‘*4<'**»**«<0‘i»«<'»***4*t44«#*«*4^«'4?«<<!00004370 


00004230 
0COC424O 
00004-250 
00004200 
Q 0004270 
0 000420 0 
U0JU4240 
00004300 
0C304310 
CCu04320 
OC-004330 


UJlOliQfc:: 

IPIi1T414 

•■^0X423i 


.^.0Dl422i-. > 

_ 00142.1 . 

■■ ■ ■■ eaX424... : 

. 00 i ARIL. ;:: : ■: 

00 143 1™ 

_ 00 1432. 

001442. 

'_ooi444«-_™v . ■; 

^ji0144SL:-_ 424 

i :..JOOi 4S2X - 


415 . RACUM' 
;.:.;:iRACUH 
Rl-=1. . 

:L*0 

no 420 J*2.K 

■ 1=L+N . 

:ri=ri4rAcuh 

. 00 420 .t=itN. 
•'NNaL4l 


AMAX 1 1 AUS IHMIN/HQLOI .RACUM) 
AMI Nil RACUM . ABS ( HHAX/HOLO 1) . 


420 Yt NN J = WltiNNJ#Rl : 
... H=HOLO*RACUH 
. DO 425 1=1 .N 

YtIl®«KI II .... 

JDOUB=K — . 


,~OOl.4S3i: 
™ 00 1456.. 
_.QD1460_ 
—001460- 


IMJRET1-2J20.170.360 
430 lERR=-4 . . ..■ 

.. : GDTO 275-. 

... . ™&N0 . 




00004380 

00004390 

00004400 

00004410 

00004420 

00004430 

Q00G4440 

00004430 

00004460 

OC004470 

00004480 

00004490 

00004300 

00004310 

00004320 

00004330 

0C0C434Q 

00004550 



77 . 'SUBRO^^^ 

„.C THIS IS. 4 DOHMV SUBROUTINE TQSATISFy THE LOftDER. 

_£!. ..A ,OUHMiYL.SUBRDUT 1NE IS , EMPLOYED HHEN^^^^N^ METHODS ARE OESlBHDi^- 


■■■ r. .. • , .. 

■_OQOOa7-~ .. . RETURM 

0.0.00X0: .. END . , 




u gi d u 



SU8RD£|TI^P KATlr4Vt PU>ld* J1 


THIS tS A DUMMY SUBROUTINE TO SATISFY THE LOADER. 

Ai. DUMMY SUaKQUTtNE IS EMPLOYED rtHEN NON-STIFF lMTH=OI METHODS ARE DESlRkD. . 


i_QQDQQ6.:, RETURN 

;^OO.OQOIi . END 




, SUBROilT-IME DlFFUMIT,y»OY) 

C I- 

- — ^ .. ♦ 

C» POUPOSE*. — • . * 

C* .. * 

C* SuaROUIlNE DIFFUN IS USED TO COMPUTE THE SCALED OEIUVATIVES P 

CP . USED BY DIFSUB- FLAGS KAY BE SET BY THE USEk TO CHOOSE THE • 

CP OESIVATIVES FOB PENDULATION.TUKStO'l.« A»0 CORIOLIS EFFECTS IN * 

CP ANY .COMBINATION DESIRED. THE INDIVIDUAL CONTRIBUTIUNS ARE THEN * 

C«» SUMM60 to OBTAIN A TOTAL COMPOSITE VALUE TO BE USED IN OIF SUB. P 

CP << 

C* PRUPRIETARY , ♦ 

C« ♦ 

C« . . NONE , . f 

C*^ - - P 

CPMSB. — .. ; ... ♦ 

C'c . ’ • 

CALL DIFFUNIT.Y.DYI . * 

l.« ...... P 

PARAMETERS ' * 

..T— TIME . ' * 

L* ...... . ' ‘ P 

CP . uY:r=.»ARRAY. OF DEPENDENT VARIABLES AND THEIR SCALED DERIVATIVES « 

G* ♦ 

C* DY-^ARRAY OF THE DERIVATIVES OF Y • 

f.P ^ P 

C# REQUIRED ROUTINES . ♦ 

CP . ♦ 

C* . _ PEND. TORS. CORL. DAMP ♦ 

CP .. . _ p: 

CA AUTHOR/ IMFLEMENTOR . ■ <■ 

CP U.R,DQRSFY.jR - 8.SEAY * 

c* * , . ♦ 

C* DATE RELEASEO ♦ 

C* SEPTEMBEK . . «► 

LATEST. REVISION ^ ^ ~ # 

.... .... ^ 


„ . SFPTeMBEft 14* 1973 ^ 

, . ^ 
^ ^ ^ ^ ^ ^ 

_ C 

C .1 .“ G • OFF FLAG 

>- C 1 1 . QN FLAG 

... C 

4c I0!<t4:i}! ^e<: <t##^<r4co>.j{=^ jjt « <!*<£ <c* ^ <t«* <t4=* 4t<t<i<(« ^ « <£«**« 

. C 

OOOOOi> ^ COMMON/ TESTC/ I PEND • I TORS , 1 CORL 

_QQOGQ£i DIMENSION. Yi 12'aj •OYUti) 

_ 000006--. DIMENSION DYPIIM .bYK 16) •OYCi 16) 

C 

c *5f! ft *i>4Hc4tjjE4:*!{t5{t4r4( 4ttti><tjei« *4r<i4c^4t4fifrfttft ft t ft ft ftft ftftft ftft ftftftft>ftftftft ft ft ftft ft ftftft ft ft ft ftft ftftft 

c 

__ OQO0O6 -:. . . OG 10 1-1*16 

DQDOIIZ DYPdJ-D.O . _ - 

_O0G01Q.. . r)YT(n=G*0 

--OOOOIU fjYcin=o*o 

-000012 ID C.r.TtMUF 

- . - c 

c . ... 

C -..PENOULATION MODULE .. € .. _ . _ 

._000014.. IFUPENIJ.EQ.Ol GO TO 30 

- 000015 - . CALL PEND IT. y.DYPl . 

C TORSION MODULE 

-.000016— . 30 IFIITORS.EO.OI GO TO 60. 

— 00002L._ CALL TORSI T.Y.OVTJ 

C— -T CORIOLIS MODULE 

~~OO OQ^~' 60 Ipi tCQRL.EQ.QI GO TO 90 — 

—000026 CALL CORLlT.Y.DYCi 

—000030 90 CONTINUE 

- C 

C SUM UP CONTRIDUTIONS TU GET TOTAL DY - IF A MODULE WAS NOT 

C USED. ITS CONTRIBUTION HAS BEEN PRESET TO ZERO. 

- 000030- DO lUO 1 = 1.16 

- 000034 -- 100 OYIII-DYPI Ili-DyTID+OVCI II 



SLJRRJUTl;^iE r,y,OYJ 

c 


f ^ 

^ - C^ PilRPOSE « 

^ . t:^ SUBROUTTME PENO lNTEf;?^ATLS THE OYNAMlCrtLLV LUJPlEli) LAG;<ft\C;iA^ 

C^ EauATiQ.NS fJF KUTIOM FOR THE PLNUULAIGRy MUTIHN. US INT TM!- ^ 

r . . C** METHOO OF l)ETACHhi) C0FJF1CIE\TS iSUuROuriUf. li^SS* TO OECOUPlt » 

t:- THE .EjildATIUNS BEFCRt IMTEGHAFION* ^ ISCOJ j JAMPlHt. at « 

J; _ J> tMCLUlTEID, IF BtSIREU. - 

C<i « 

f P-^LPPfETAkY * 

C -i O 

I kONE >> 

C< . . , . « 

C* USE » 

. . ^ 

l> CALL P tNi3<T,y*lTY J ♦ 

C- ^ 

J _ L^ PARAMETERS 

J L* . . , ' ^ 

f C’^ T TIMF * 

I .._ * 

: Y array DF yCPENOENT VARIABLES A>30 SCALED UERlVAIlVES « 

^ 

C* t)Y— ARRAY QF DERIVATIVES [Jf V WITH RESPECT TO T 

ii= .C4»... - ... . , 

r r* REQUIRED ROUTINES ^ 

c* * 

C* DAMP . * 

r ..c* . + 

^ CA AUTHJR/IMPLEHENTOK * 

? - O.R.UJRSCYtJR* “ B^SEAY ^ 

?! c<= ..... . * 

• C« DATE RELEASED * 

^ ^ 

^ C* SEPTEMBER 14.1973 * 

E r.» . __. . .. - ^ 

f L* LATEST REVISION ^ 

C« .... 










SFPTtMBfR * 

C<* ' ^ 

. ... c 

c . 

(^3J qtji{(t!i#i>4tjJi:^#^aJt#3i)t4r^i«!<«itf«:j{tsJ()pc4:^ 4* tX44r «c«r « <M> )«r 4 A * « <5^ * # ^ ® ^ t <: * * ** 

c 

c * 

^ 

c . * 

r: . 

I r 

^1ooOQO& COMMON /. .CtnST / Mfi * MS . MPt ?^E . M , KiJ • A 1 , L * P #RS * RP . K'C . G . RHG. MU • N . 

_ . ^ HStHP.hE 

,0J0C36_.. CimUH/ QAMPC / ASCS * APCP . At C L , 0( 6 J f I (DAMP 

^OOOUt)6._ COMMON / SC’SPF / S« r SS tSP » St. . SB 1 , Si 1 1 5P 1 1 S£1 

QOCj06 01 MENS ir\ Y( li?8) •M( Ai *0Y(16) ,A( £5, 81 .ii£ 3) .C£a.9J »Q( 8i 

..OnJuOa..*. KtAt .M.LrNU 


L 


L 


.. c 

. L 


^OOuC^Qji. 


COMPUTE THE THETA/S AND PHli^S 
THf.TA8=Y{ U 


-ODooaz*... 
_Q0001Q -. 
^.00012^ 
^acroGia _ 


PHlBsYlPJ 

rHETAs^Ytai 
PHiS^Y « A) 
THtTAP-Y{51 


_0OGO15_ ^ PH1P^=Y(6J 

_a00aL6 THETAE=Vt;i 


_00002Q-. 

_ Q00021 

..D00Q23 . _ 
„ 00Q024— . 
..000026 _ 
_ OQ0D27 


l»HIE=yj8) 

T0aTB=Y(9> 

onn)=viio) 

TOOTS=YUll 
D0TS=Ytl2J 
^tOQfP’Yf i31 


. 000031.- UQTP=YCU) 

„ 000032, T0UT£=Y<15I 



^ 0003 ^ 


nnTE=Y(i 6 > 


c . 

C ORVUnUTlKE ID IF PEN 

r. 

"f; ^ Ct> ^ « TJI « <r <t ^ 

CP ^ 

c» p impose 

C.* - ' • 

f.c DRVKOUTIKE QIFPEN DtFINfS THE DEHIV&UVES Furt I'rtO Tl Bt USED <' 

CF IN RlFSUa. « 

Cfr * 

C THIS PRUliRAM COMPUTES THE UERlVATlVtS OF YI I) 1 = 1. Ki nUlt KCSPcCT Tu 
C T PLACES THE RESULTS IN OYII) I = L.l& AND RtIURMS TQ ulFSUil 
C 

C INITIALIZE VALUES FOR DIFFU.N 


000055 

000057 

QOClUAL 

-.000045. 


<1 1J= yj . 56V 1 3 4=f R6*R H 
XIS= 3 .a 6 ^ 5 b<-PS=?i<S 
XlP=l. 2 7A5«rU**KP 
XlC=7.329*KtW.L 


OaOOAi 

.000050. 

.0000S3 

000056 


Zl=XIB/l.M(4)«KB*RBJ 
Z2=XIS/««( 3) *AI*A1 » 
Z3=XIP/IM>IZ)*L*L) 
Z4=X1E/IMI 1J*P#P) 


00006 L 
000064. 
000066. 
OOQGfi 


Sa=l./ (Zl*l.) 
SS-1./IZ2+1. » 
SP=l./(Z3»l.) 
SF = l./l74n.I 


.000073. 
.000075 
000077 
0001 00 


n?Zl/l THFTAfi«THETABI 
Z? = Z2/ tTHETAS»TlieTASJ 
/3=73/(THETAPPTMETAPl 
Z4=Z'./«THeTAE«‘TriETAE» 


QOOIO? 
QOOIOS . 
000107 
OOOllZ 


SRl=l./(/lFl.) 
SSl-l./f Z2F1.I 
SPl=i./tZ3»l.) 
SFl=l./(Z 4 n.» 


FORM A MATRIX 


V C 

C 

I- C 

h .^OUA^ . OD iO 1 = 1. ftl 

^ _0QDtl6. 10 A( Un - latj 

.DDDia^ , AUt2)-A/ l,^) = A( 2. lJ = Ar3#2J=A(3.4J‘ Al^.:il^Ai5,bi = A(5,ti) = A( 6,51^ 

1A( 7»6J =A( 7.a)-At H. 7)=U.O 

' C SET UP The initial values 

i c 

V ^.000162 Cl = Sli/««l^t)=5^Ra) 

S ^000165.. 01=Mi3)*Al 

iF ^-OOOliJ? E1 = K(2)«L 

_.0Q0171 

f .000173 i:;i=RFi*rKtrAi3 

^00175 hi = ai^thftas . _ 

QOQ177 H?=RB#PHIR 

000201 4(L.3J*m^Cl 

^ _0u020i A( l.i») 

. 000?UA. A( 1,6) = r TMrTAP*IPHlB-PHlP)*Cl 

000? IL. All.7)=FjtCl 

^C02L2 AU.BI -FL’5^rMtTAE«^(PH'Ifi“PHlL)*Ci . _ 

^ c . ; 

F . ~ L RESET Cl 

^000217.. Cl^sm/(M( 

i; .J0Q02Z2 At2. 3i=01*PHlS^Cl 

«O00224-- M2*^J =Ol<-THtTAS<^Cl . - _ , 

0J0022^^,., . Ar2.5i=El*PHlP»Cl 

.00023a A| 2. 61 -FI ^ THE TApoC I 

QD0232 AI2. 7) sFl^'PHlE^Ci 

,ilQQ234_ Al2.al=F}’i*rH£rAE^Cl 

C . 

^ C RESET XI . . 

C 

J100236 , Cl=SS/Al 

i- .000240.. A(3a)=RH*Cl 

! ,000242 Cl=Cl/M(3) 

000244 - A(3.S)^E1»CL 

i; 000245 _,A13.6J=^E*« rHErAP*(PHlS-PHlPJ*CI ^ _ - 

..000252 Al 3. 7) =F UCl 

.000253 Al3tOI = Fl‘>THtTAE»IPHTS-PHlEl<«Cl 



t 


? 0DG334 

^ 000336 

•: . 000337 

_0Q0342 

.000346 - 
V „0003A7. 

.. G 

. c 

« . . .... c 

If ^00351- 
r ..OD035A 
r ^000355 
-U0Q35T 
i" -XI00361 
■p JQ00362.. 

K -.000365.,:.. 


c 

i: 

c 

^000367. 

|;: ,000371. 
if -.000373 . , 

:f .OOu37a 

||: c 

H jmQ3iJi 

If JOOAOJu-- 
^00403,.- 
^ -.000405 

; , : c 

£ ^00407 

U10OALL 

£ - 000413 - 

? -000414 

f .000416 

000420 

- OOQ422-. . _ 

000423 



Cl=SE/P 
fl(7, U=iA{^«Cl 

A( 7f2J :=GU(PHI£-PHniJ<^Cl 
Al r./f) tPHie-PHIS) *Cl 

At 7,3} =Al<‘CI 
A(7,b»^L«>=Cl 

KFGPT Cl 

Cl=SEl/(P^THtTAE> 

At 3, 1) =H2*CL 
melt'd 

A^t^3l=Al=^PHlS*Cl 
At ‘U'*> 

At B,5I=L=«'P1HP«C1 
At a*6J -L^THC rAP^tCL _ 

FORM THE B-^.stATftlX 


SET UP IrilTIAL CUMOITIGNS 

P‘ni2TB-OOT^'^COT^^t^THETAB 
'M)S2TS = t)aTS«!'0aTS<^ThETAS 
i*0P7Tp-D0Tp«00TP<=T**tTAP 
PDF2T E- OOT Q«!JOT E *T Ht T AE 

pnmOt3=Ourf5t*TDaTO 

pdstos=d.:ts<=toots 

PnPTDP-OUTP*TUUTP 

PDLTOE^DOTE<»ruQTE 

PBMPP=PHl!i-PHlP 

P8MPE-PHIB-PHIE .. - - 

PSMPP = PHJ S-PMlP 
PS«P£=PHIS-PHIE 

T8MTP= THET AB-THL TAP 
I0OT£=f}iETAii-THeTAE 
_ISMTP^TH:TAS-rHETAP . 
TSMTE^THtTAS-THtTAE 




RBSeT C^l 


g c 

. ^ c 
4 ■ .. c 

y 0DG260 
J3Q0262 

fi j)QQ263 

!■•:■ - 



4 000265 

? MOOlht 

. 000271 . 

.0 00275 

5 <000275 - 

S' .. . . C 

If - . r: 

[: . 000277 
.000301 . 
if ^000302 
.000305 . 
pi ^O0307 

4 ' r^’’ ’ c ' 

^5 c 

.^00312. 
i -B00313-. 
C 

tIT* ' C 

I <J)Q0315.- 
f 000320 
» _OOD32L 
" _iQ00323 
f *-.000325 - 


i 


t 


r.i=ssi/Hi 

M'i. U=H.2«‘Cl ... 

RESET Cl 

Cl=Cl/M«31 

Al<>*SJ -EK'PHIP’CCl 

AU.6l=El«THETAP«Cl 

AlA.7l=FM'PHlE*Cl 

A14.H1 =Fl«THETAfc»Cl 

RESET Cl 

Cl=SP/L 
At 5.1 1 =RU*Cl 

At 5.2J=Gl*tPnl P-PHtBJ«‘Cl 
AtU.BI ?ni«CL 

At 5.AJ ^Hl#tPHlP-PHISl*Cl 
RESET Cl 

ci=ci/m 2 j 

At5,71 =FIPC1 

RESET Cl . . . 

Cl=SPl/tLPTHETAP» 
At6.ll=H2*Cl 
At 6.2I=GI«<C1 
At 6.31 =AI*PH1S«C1 
A(6*M^H1«CL 

RESFT Cl 

U . ./ . 1 ( .<1 

at'f, n =.( **fM|fcr(, I 

i*:.UlAL*Cl 


MO 3 26 
0 Go 3 30 
G 0 ' 6;*32 


.1 • C - 1 


R?=M12 >?L 
R3=M( I )'*P 
R 4 =M( 3 l*Al 

til. Ui. AND Wi i^ILt VARY MHtN Nt^CESSARY 
COMPUTt THE H-HATRIX 


Blll=SB*(PJ»2TB-Rl«CMl3)Al-Al«'PDS2rS«-G=»rHETAn) 

1 J-R2#{ TDCiTP^U.^DQTP^PUKPP^TDOTP^ TBHTPJ-PtJP2TP J 

2 tR3*( rotJIE^ta.^UUIE^PBKPEtTUUTEOlbMTt-J-PUeZTFH 1 

Wl=-2./TMErAE 

alEl^LSlfSP l*tRl*(RA*POSTOSHl2*P3PT0P«-RJ*PDElOEI tPOBT I 

Rl=l./Al 
rfl=l./HI 3) 

Bt3) = SS«i Pi)S?TS-Rl«{ (-P.E«Plifl2rB»-G*THETASI 

1 i<2«t TlJUTP»l2.*OUIP*PSHPP«-3DuTI>»TSrtrPI -PL.'f*2Ti' » 

2 .. tR3frtTUiJT£*(2.«LtuTE*P5MPEtT3t)IC*ri»MIE I-PUE21L n ) I 

□l=t01*THETAU)/IHETAS 
Rl = Rl»m 

iJ{ AJ = 3l*SS Ml3l*PB*Pl»BT0B«-R2*PUPT3P*R3sPDETDh J »P JSTUSJ 

ZHobssal ~ Ri=i./L 
.jDflOS55._ . WI = l./Ht2J 

C 

_OOOS5t BI5i=SP<'lPOP2TP-Rl*IRB<'tIDaTa*(2.*iJOTa*(-PBMPPJ HOUT B* (-T UHT P 1 >- 

' . 1 PUbPTBJ 

Z „fAl*tTDUTSM2.*UQTS*l-PSMPP» l-TBOTSoi-TSMTPi .-Pl)S2IS1 

• 3 _*G«THET AP-R3*Vll«‘POE2TEH 

C . 

-jODIl6i2 01 = lUl#THETASJ/THETAP 

-_0006l4i . -- Rl=Rl»Hl 

C 

_JJOQ6i6_ flt6ift01«'SPl*(Rl<'tKl2mRa<'P0BTDBi-Al*PDST0SltR3CPDETuEl tPOPTOPl 

I ”000630^, **. Rl = l./P 







000425 - 
000430 
000432 
. 000434 

C 

c 

c. 

000456 - 


.-00Q466, 

_0Q047Q 

rOOOttOl 
. 000503 

0Q05Q5 


C 

... C 

c 


.^.. c 

.^000535 . 
-000540 

Zab 654 L„ 

r 


. 000631, 


C 

<J)Q0663_^ 

C 

_OQ066S 

" - r- 

-OQO^Z^™ 

.,0011627 

.,1100701 - 

^QOIOS 

C 

_ 0007X1 

- c 

,OOOIU- 

-000713 

,.000715u, 
,7100116- 
-000230-. 
c 

c 

, 0Q073Z-*- 

-0Q0736 

.0007/^1 

Q0Q7 47 , _ 

-000T4A-. 
,0007^5 


. aL7) = ^E«rP0E2TF-Rl MRB<'[TDDT3«(2.<‘b0TQ<‘t-PGMP£) FTDOTR^ l-rSHTE J J 

1 - » PJtt2TB) 

2 - rDtTTS«l2.*lJUTS«C-PSMPfcJ M DO TS* l-TSMT E )) -PDS2TS ) 

3- r-l^'PDP2rPfrG»THFTAEn 


.. 01=<0l^THBTAP)/rHETAt 

a<ai^Ql<‘SEl«'lRl*(RB#PDBTDtifAl<^PUSTDS + L*PUPTUPl tPDLTOEl 
ADO„ IN OAMPIMG CUNTRIBUTIQN 

. fc . . 

- lFtlUA?lP*eO*Ol GQ TO 30 
CALL DAMPIY) 

on 20 K=Lpa 

20 BCKUO(K) fDU) 

30 CONTINUE 

FORM THF C-MATRIX 


DD AO I-l*a 

- -C( U9i=nt 1 1 - 

UiJ AO 7^=1 *B 
AQ Cl X.JJ^AI 1 .J1 
CALL -BOSStC.N.ai 

THE DERIVATIVES ARE FORMED AS FOLLOWS 

on 50 I=l«8 ' 
oyu)=yt UB) 

0Y(H^8)=0( n 

SO- CONTINUE 


RETURN 
• END 


. SLmaOUTI*>iE TURSIT^V.OYJ 

c ^ 

^ 4c 1^ «r;^ 1^ « ^ ^ ^ ^ ^ 4r licit ^ ^ 1^ ^ o ft ^ ^ ^ 


C* . 

C«' PURPOSE * 

c« ^ 

C.^^ SLIBRDLJTINE TORS INTtGRATES THE TQRSiUNAL 'EQUATIONS OF MOTIOiN* * 

C* DAMPING IS already INCLUDED- THESE EOUATlUKS HAVE ONIY STATIC ♦ 

C* COUPLING ANU CAN DE iNTfcGRATEi) DIRECTLY flY OIFSLPi* ♦ 

- - “S' 

PROPRIETARY ♦ 

C<* ■ # 

. .. NONE , « 

C<f . . * 

C* USE . » 

L9 . _ . ♦ 

Cfr CALL TORSI T. Y,DVJ ^ 

Ct . ♦ 

c« PARAMFTLHS ♦ 

Cfr t 

I TIME » 

c? . . . ... . ^ 

L* y ARRAY OF DEPENDENT VARIABLES AVD SCALED OEIilVATlVES » 

C*> ♦ 

C4. nY-*«ARRAY OF DERIVATIVES OF Y WITH HCSPECT TO T ♦ 

* 

C<* REQUIRED ROUTINES ♦ 

, . - .. . ... .. .. * 

C» NONE « 

C* AUTHOR/ IMPLEMENTOR ♦ 

C* . , ♦ 

C* D*R*DURSEY,JR - B.SFAY ♦ 

.. , - ^ . . ♦ 

C^' DATE RELEASED * 

Ct * 

C* SEPTEMBER 14.1973 ♦ 

♦ 

C* LATEST REVISION » 

CA . - ... . ♦ 

SEPTEMBER 14.1973 ♦ 

C* . . * 



. C .. - 

C \ i 

-. C 

.. C 

C . <• 

_ C«^«- _ -5 


C 

. f.» »»»»»4»»» »»»»»» >»»»»» «ifr4i« 5*; <r« <1# 

„___ZL, G 

C 

^OjOOQ 6 Cnw^nN / const / MB»KS»MP«MB«M4Rt3.AI*L«P«RS*RPtRG.G»RHa*MUtN» 

. . V HS#HP*H£ 

■^OOQOfa REftG, ^56*NS»MP*NEtMrL*MU 

^0nmi6 DIMENSION y(o^.}.Mt4)*UYU6l 

C 

<t***<t4‘*^«<* «e;S;<t<r«^*#fr##iJt*JOe<£itt!ii#«**iOc#i{rfr#^jJeC«e 

_OQQ006 - .. O^RBf A1 

^qojqot:.. TAus=rts*G*KS*as/o , 


_000QX3 

__000Q16_- 
__D0Q022_ . 

000024 

1.C 


Q=m-L*HS 

IAUP=HP*G*RP«^RP/Q 

0=0<-P«-HP 

TAIJE=ME<>G*RE*R'E/Q 


—000030 QN=2.5*StmHRHU<‘MLJ J 

— Q00.035. ETft«l=0N*Rtt**4*SyRT ( ABS( Y I lOJ I } 

^ 000047 . FTAS=(JN*RS#*4*S0i<T ( AaSIYU2H » 

000057 £TAP=0N*RP«-*44'S0HTtA3SIYU4n » 

000062 ETAE=JN*iiE**4#S0ftHABSlY(l6li ) 

C 

__QQOOJ7. AtB=2.<=MB*RUPHB/3. 

__0OOlQ3— -. * . AlS=fl.5*?iS*RS5‘KS 

000106 AlP^D-S^flPPRP^AP 


-.000110-. AIE=0.5<>ME«‘ltt<-RE 

C . _. 

„ r. uavRouri'^E oiftor 

- c . 




J)0flU3 

.QJ 0 PX 14 -.I 

..aopiis 

000116. 

00 U 12 Q 

000121 

oouia 2 

00 QU 3 
J100L25..-.. 
.000126 . 
.000134- 
.000135 
-X10015U 
JX00151 .. 

XaQUxA 

.000165 


JOOD175 ,, 
J10O175 . 


c« 


PURPOSE ^ 

DRVROUTINE UIFTOR DEFINES THE DERIVATIVES FOR TORS TO BE USED 
XN.DIfSUfl, 


« 

» 

<C 




c 

L 

c Ihe derivatives are computed as FDLLLIWS 

c 

c 

omj =?o,o 

DY12I ^YtlOJ 

,DYf3l =0.0 .. 

dyca) ^yiiz\ 
un 5 J = 0.0 
UYI6I =Yn*'t) 


nvin = 0.0 

liYUn =Ytltj) 

DYI9J =0.0 

DYl IGll =l./AI 'ifrl-ETAB^YdOJ-TAUS*'! Yt 2)-Yl4n J 


DYI U)=0.0 

UYU2)=;l./AIS<'(-ETA$*yil2)*TAUS«t YI2)-YI4J I -TAU P* I Y <4 > -Y < 6 1) ) 


DYI 13)=0.0 

DV U4l=l-/AiP^‘t-ETAP*Y( 14J FTAUP^ I V ( 41-YI 6J ) -TAU E*1 Y ( 6 ) -V t 8 H I 


^ UY(I5)=0.0 

0Y(16J =l./AIC*C-ETAE^YU6J f TAUE« ( Y( 6i -Y I BJ IJ 


G 

C 

RE TURN 
END 


-SUBRUUTP;E CmLCT.Y.DYi 
C i 

c^ ^ 

C=^ PiJRPDSE 

C^ ^ 

C« MIBROLiTINE CQRL INTEGRATES THE EOUATIUMS QT MuTillN FiDR THE * 

C« CnP.IOLIS EFFECT*. THI EQUATIONS HAVE ONLY STATIC CUHPLING ANO * 

CAN BE INTEGRATEO DIRECTLY BY DIFSUO. NJ DA:^P!NG IS I'NCLUOED, 

C^‘ . . ^ 

C4^ PRUPIETARY ^ 

. * 

NONE , * 

c* use . . 

CALL GORLir. Y^DVJ 

C^' « 

PARAMETERS <« 

C« ^ 

Lv T TIME * 

C^ _ . . ... 

Y ARRAY OF DEPENDENT VARIABLES AND SGAIED DeRlVAT|V£S * 

c* , DY“^ARRAY OF OLRIVATIVES OF V WITH RESPECT TO T >4* 

, . ^ 

CC* REQUIRED-. ROUT 1*NES ^ 

c« none - . ■ . . * 

c**^ . . . - . - . ‘ * 

C4* AU I HOR/ 1 HPLEM ENTDR * 

C* - _ - <■ 

C* U.R,DORSbY,JR - {I.SEAY * 

C* DATE RELEASED * 

CO . . O 

CO . SEPTEMBER U.1973 * 

CO . - . . . . - o 

CO. LATEST REVISION * 

CO SEPTEMBER l'V.1973 o 

CO . 0 


c . # 

^ 

C , . , >> 


C 

- j > aQaD &-. 

_ OaOflQ 6 _ 

looflobd .. .. 

. 000006 .. . 
.000006..- . 


COMMON/ CORIO / OMEGA. L AMO A 

COMMON / CONST / MB. MS. MP. ME.M. ftB. A L, L.P .RS« RP . RE. G. HMO. MU.N . 
* HS.HP.HE 

DTMENSrON Y< 128> .M (<V) .OV C 161 
R e At Mri . MS .K P , ME . M ,t . HU. LAMOA 
REAL MUB.MUS.MUP.MUE 


c . . 


_O0ODO6_ ... 

.000011 

_OJOQOi6 

.1100022 

.000027 

.J)0003a_ . 

_0Q004Q... . . 

- 0000^4 

£ 

looobsiZI ^ 

,1100055 

000060 .. 


SET UP XI*S AND MU«S 

Xla<sY( 9)*YI21*YI 101*Y(U 
X1S=V( IU*Y14)*YC12J«Y(3I 
_XIP=V1 l31<‘y{6KVll^)*V(5l 
XIE=Y( 15i4‘Yt8H-yU61«‘YI71 
. HUR=Y( 9>-y(10l*Y(l)«Y{2l 
MU.S=Y( in-Yl l2)*Yl3J>i-Y(4l 
MIIP=Y( 131-Yl l'Tl#Yt5)*YC6> 
HUt=YU5>-Y(l6l<‘Y( TjmOJ 

~SET.UP IMITlAt VALUES 

" tI - 2 .<' M 0 * QHEGA * R 0 *RB 
.SLAM»2 . I NIL AMUA) 
CLAM=C0S(LAHUA1 


.. . ORVaOUTlNE OtPCQR 



C<* , i' 

C^ PURPOSE 


C*'.. . 

C* GRVRDUTINE OlFCtJR DEFINES THE DER WAT IVES FOR CORL TO BE USED 

-C^ IN DIFSU3* 

.. 

c 

G THIS PROGRAM COMPUTES THE DERIVATIVES OF Y(I! 1=1.16 WITH RESPECT TU 

C T. PLACES THE RESULTS IN DYI U 1 = 1.16 AND RETURNS TO LUFSUtl 

C . 

C SET UP THE FIRST DLRIVATIYES 

C ^ 

_QnQQ^ m lu 1=1.9 

^.OQQbh DYm^VCrt-dJ 

-J100Q7Q laXOfa.lNUE „ - . . . 


Xu 

Xf 


-.000022^.. 

-.000102^ 

- c 

c. 

_ODOXD2_ 

^00113- 

_D 00120 

C 

: C 

^0Q123_ 

^Q0133l_.. 

L 


-.OOOlAX 
OQ0144_ 
^000146 

-oooiai — 


QYtyJ =TH^(SLArt4‘(Xib-MUii'6»Yt2n+CLAH#XUv*Ymi 
UYaDMTl’^I-SLAM=fi‘IKIB«^Y(2i^'HUBKYan 

RESET THE INITIAL VALUES 

TI=2.* I MB+MS) IOMEGA , T 

T2=1.H'A1 

XTl=Ra#XIBMl<fXlS 

XMUl=RB<fHUB+Al»MUS 

. COMPUTE MORE DERIVAIIVES .. . .. 

. i)Y{ UJ=^T2<=<SLAM^iXU^XMUl*YlAi aCLAM^Xri*Yl3n 
. . Oy« l2)=T2«(-SLAH=9^(XIl^Yt4UXMUl)’4‘Y( 3) J 

. RESET VALUES 


TI = Tif2-«HP'!‘ OMEGA 
T2=T1>^L 
XI1=XU+L'«‘X1P 
XMUI=XMU14^L4‘HUP 



C 

, C .^COMPUTE FURTHER OVfS _ 

C _ . 

OOQISA^. UV ( U) =T2* I SL AM^ (X 1 1-XMU1^Y( 6 » J *CLAM<f X 1 l«Y i J J 





000164- * DVCl4i-T5*<-SLArt^< Xll^YC6|>KHUl»^Y<5n 

t ' . C 

.. . C RESET l&ST IMlTIAi VAUiES 

f C , . , 

? — : TL5T1+2*X‘HE<‘0MEi>A . - 

000175 r2 = Tl«R 

ODQ177 XIi=^XIl+P^XI£ 

0011202— XMU1«XMUH-P«M11E 

- C 

:j C COMPUTE LAST SET Qf OERIVATIVES 

^ -Q00205 . UYU5J-r2^ISLA««(Xll-XHUl«YC^n*CLAH>P=xa^y(7n 

I ,000215 0yU6J=T2=S'I--SLAMA{ Xn*Y« Bl^yMUlJ^Y(7J ) 

& c 

.QQp2^3L_T RETURN . 

' pqf]224 . END: : ^ 





^UBRa(jTI»^'e DAHPCYJ 
C i - 


G’J'-.. - *■’*■ 

Cf PURPOSE— - - * 

C* . * 

C* StlBRHUTlME DAMP DEfINES THE VISCUUS/AErtUOYNAMlC DAMPING EFFECTS ♦ 
CO that may be included in SOBRUUTInE pend. IMt DAMPING VALUES 0 

C« ARE RETURNED TO PEND THROUGH THE ARRAY 0111-0181. ♦ 

r.o . . - - * 

A PROPRIETARY .. ♦ 

..o . . . ... • 

L* .NONE- - . -- - * 

CO - — . - * 

CO USE. . ♦ 

CO CALL.DAMPI.YJ . 0 

C« - * 

C* PARAMETERS ♦ 

CO - * 

CO Y--- ARRAY QF DEPENDENT VARIABLES AND SCALED DERIVATIVES * 

CO RFOUIREO ROUTINES . * 

CO - .. 0 

CO . NONEJ- - - “> 

CO ... .... .. . - .♦ 

f.» AUTHIR/ IMPLEMENTOR... . . . . * 



t;« □.R.OORSEY.JR - B-SEAY _ . . * 


C* 

C* DATE RELEASED 
C« , 




SEPTEMBER.. 14. 1973. - - - 


t 

c 

* 


^ 

LATEST REVISION * 

C<= * 

C« , SEPTEMBER 14tl973 ^ 

. . .. . ♦ 


.C- 


c - ■» 

C»-0- "* 

c»-*~ 

c»-tti - * — 

c»-*- 

c 


* 

* 


Q a««t4i«E»«it>««««^«*«i|i«*i*6 9« *»»««« «**0«44>**«>»)»«^9«-»$<]>«<>^4'*ii‘»**«*4'«f^««9<>!i‘«4‘i?t> 

C . 

c 

.c 


..000003— . .COMMON./ CONST / MB,HS.HP»ME»M.R8.A1«L..P»RS.RP..RE.G.RH0.HU.N* 

♦ . HS.HPtHE 

000002- . COMMON/ OAMPC / ASCStAPCPtAECEiDI8» .IDA'MP 

.000003 COMMON / 5BSPE / SH.SS.SP.SE.SBJl.SSltSPl.SEl 

0000Q3. RFAU MB.MS tMPtME.H.Lt HU 

juiOflOi- UtMENSlDN. MIA) 1/11281 

C 

c 

INITIALIZE VALUES FDR B-MATRtX 


C 

C 

_O0QDO3 

itdooio 

000013- - 

.OQOOIS. 

„ c 

OOOQ2:A 

-000026 

.000030 


RHaM=2.3*S0RIlRH0*MUJ 

ATOOTB=ABSCyO) J ‘ 

SATO&=SORT UTDUTBi 
01 l)=RHnM*RB*RB#SATDBfY(91/Hl4l*Sa 

AOnTB=ARScvi ion 

SAw6=S0RT( AOOTBI .. .. ...... 

. . DlElsRHQMORB^RB^SAOB^YllOJ/lHIAI*/! 1I*Y11U<'SBI 


< .boOOAQ- RAC=0.5*RHO*ASCS 

000O42 Zl-^RB^Al 

f .aODljAV-. XII=R8*Y191»A1*Y(H) 

.OOnOSijQ AXIl-ABSlXIll . - . 

.OOOOSl -. XI2=»AX11''X11 

Jt0d053 Dt3)»RAC#Zl*Xl2/IHl3mi*All*SS 


DbObOO Yll«RB*Ym»Yl l01fAi<'yi31*m2J 

000065 .. -AVH=ADs;yai 

P .00006Z yi2=AYii*vii — 

p .tidOOTL 0UJ?RAC*ZI'>YI2/1H13J*A1«AH‘VI3I*Y13J l*SSl - 

I ... . _. c . . . . 


^ ooaiOQ- — 
000102 
. 000104- . 
,J>00107._ . 

_aooiio 

c . 

.000117„ . 
.000123^ 

.. Q0c:2.4... 

_Q0Q1Z5 

. . C 

..OOQ134 

,000136: 

-J)0QI40„ , 
,.OOQ143_„ 

■^0014.4 

^00146 

C 

,J30ai53L. . 

. onoi5i-._ ... 

00016Q_^ 

nn oi/il 

^000170 ■ ^ 

0QQ1 7L 


RAC=0*5<^RHO<^APeP- - - 

Zl=ZliL - - - - 

XIl^XI l|i^L«YCl3l 
AXll-AaS(XIIl 

JCl2^^AXll*X12 

DJ 5 » AC^Z !❖ X 1 2/ IH i 2 > »L «=U ^SP 

yil^YIltL4‘YU4)*yt5) 

AYll-ABSlYm 
Yr2=AYIl’^Vll 
U( 6 ) ^ R AC« Z YI2/ iHl 2 J *L VI 5 J « Y 15 J i SPl 


_ - RAG= 0.5 ♦RHP* ABC E 

Xll«XllfP*Y115l - . 

AX[1=A8S(X1II - 

XIZfAXII^^XIL 

. - 01 n^RAC^Zl^Xl2/-(H(ll*P«'Pi«'SE 

. . JfVl^YlU^P^YUbl^YtTJ 

AYU=AaS(Ym _ 

yi2 = AYIl»YIl 
Dtai=RAC«Zl^YI2AUWJ.i >*‘L^L«Y(ZJ3!VJLJJ J«E1 

. — - . . . « 4- 

-.RETURN - 

. -feNO- : - . - 




. SUBROUTINE BUSStA.N.OI • BOSSOOOl 

C . ■ ■ ■ . 

C4: ^ ^ IQI « ^ ^ ^ 4(|Q| ^ 1^4 <1 « 

Cfr PuHPasE .... ♦ 

c<» * 

.SUDRQUTINE BOSS EMPLOYS THE METHOD QF DETACHED COEFFICIENTS TO * 

Cfr SOLVE A SYSTEM UF REAE LINEAR EQUATIONS REPRESENTED BY THE MATRIX* 

EQUATION AX-8 . WHERE A IS A SQUARE MATRIX QF GOEf F IC lENTS t X IS* 

C* ....IHE^SQLUTiaN VECTOR. ANQ-B IS THE RHS CUNSIANT VECTOR* 4 

C*‘ ♦ 

C* PROPRIETARY . * 


C* _ 

C* CALL BQ 
C* 

PARAMETERS 


CALU BQSSlAiN.Ol 


AN AMDMENTED__INPUT MATRIX CONTAINING THE LHS MATRIX. QF 

COEFFICIENTS IN THE FIRST N CGLUHNS' AND THE RHS CONSTANT 

VeCTUR IN THE IN + U-ST C3LUMN* THIS MATRIX MUST BE 

_ .. DIMFNSIONED AT LEAST (NtN^L) IN THE CALLING PROGRAM. 

nJJthE number OF ROWS IN THE A MATRIX. 

^"T thE SOLUT ion VECTOR. THIS VECTOR MUSI BE DlHENSIDNED AT 
_ . LEAST N IN THE CALLING PROGRAM* 


♦ 

♦ 

* 

* 


C* REOULRED ROUTINES 
C* 

X* NONE .. 

C* , 

C* AUTHQK/IMPLEMENTOR 
C* ^ - 

C* V.C*TAYLDR , 


.c^ jQatejreleaseo:. 

C* . 

C* JUNE 14. 1973 


c* 


t A TEST RtVI^^lQN 

I 

JUNE 14. 1973 


«( 

» 

>e* 

4c 


^ 9 <1 <c* <cip( ^ 9^ « «4> 4^4 ^ 4^ 4r ^ ^ ^ « 4c 4c« 4( 4^ 4> 4t 1 4 ^ A ^ 


3- 

_ c 

.000006 

DFMEi 

fV. 

OODODfiL. 

B12 = 


^Q0012 

, B13= 

;-t 

000015, 

B14 = 


..000021. .. 

B15=- 


.,000024, 

Ql6=. 


DQ0Q30 ... 

B17= 


. 000033 , 

BUi=. 

y. 

.^ooaoax—:,. , 

B19^, 


. 000042.- 

B22= 


..000051.... 

H2 3- 

I--.' 

_DQ006U ^ 

B2 4« 

%■■'■ 

-.000070 

.B25^ 


-OOOlOli. . . 

826= 


^00102 

J2/ = 

i 

.000117^ 

82 a = 


.,000126 

B2 9= 

lit' 

^00U6,_. 

_ B32=^ 

r.r. 

.JD0014S-... 

B33 = 


_0Q01S5 

B34 = 

!?; 

^00 

Ji35= 


. 000174^.,. 

B3o= 

M 

,000201.._ 

83/= 


. OOOZ13._ 

B3d= 


«J)00222 . 

639= 

1 

_0 00232 

842 = 


-000241 

843 = 

it 

.000251 . 

B44= 


AIN.l) .Q<N) 


pU 


(A<2«2 J-AC;? 


(A(3.2J-A(3 
(A13,3)-A13 
CA13.4 J-AU 
(A(3t5HAl3 


CAn.ar 


“A(3 

>A13 


=«A(4.2»-A(4 


000260 

CI0Q2T0 

. 000277 

000307. 

..000316 

000326 
000335 . . 


B4 5=IA«4.& »-Al4 
H4tJ=:( A14.6J-AT4 
B47=<A(4.7;-A(4 
B4B^tA(4«a}-A(4 
B4^9^Ul4.9i-A<4 
B5?=lA(5.2 »^A(5 
B53=( A(5*3)-AtS 


*U#B12) 
. 1 J*B13) 
t U*B14» 
.IK'BISJ 
«U4bl6i 
•1)4B17) 
, 1 J4B1B) 

• U*Bl9i 
f IJ4B12) 
.U4hl3J 

. n«bL4i 
, IJ 4BL5) 
«i|4BL6J 
, n«B17> 
.n 4B18J 
r 1*4(319) 
* 1)*B12) 
« n«Bl3) 
.D4B14) 
t l)«bl5) 
« l)4B16) 
. U4B171 
« lJ4Blb> 

• U4B19I 

«U*B12I 
. 1)4613) 


BOSSOO02 

ttossoaos^ 

BOSSOOQ4 

BUSSJUU5 

0CSSOJO6 

B0SS0UU7 

BDSSO JUQ 

BQSS0J(j9 

BtiSSJOlO 

BUSS juil 

BUSSJ012 

BUSS OJ 13 

flOSSOQl4 

BOSS 301 5 

BOSS 00 16 

flUSSGOl/ 

3USS0013 

80SSd019 

BOSS0020 

BOSiOJ2l 

BOSSOU22. 

BL1SS0023 

DUSS0024 

BnS50u25 

BOSSOJ26 

BOSS 302 7 

BOSS002H 

BOSS 0329 

BOSS0030 

BOSSOU31 

BOSSu032 

BOSSU033 

BQSSl;034 

BOSSOJiS 

6USS0036 




000348 

H54=(A(5.4t~A(5f 

IJ<^D14> 

B0SS0037 

000384 

B55=(At5.5>-A15. 

1)*B15> 

BOSS 00 3 8 

00036^ 

aS6s(Al'5.6J-A(5« 

1)«B16| 

aQSS0039 

000373 

B57=lAt5,7 J-A15. 

II*B171 

BOSS0040 

-.000403 

U58-(A15.8)-AC5. 

11*8181 _ ... 

BQSSGJ41 

000412 

B59-( A(5.9)-A(5. 

U’^BL9I 

BOS so 042 

000422. 

Bb2° IA16.2 1-A(b* 

tl’*‘Bl2) 

BQSS0043 

. 00043 L , 

Bb3={A(6.a]-A<6, 

l)«bl3J 

6DSS0a44 

000441 

B64=l AI6.4)-A(6> 

n#BL4) 

BD6S0045 

000450 

B65=(A(6.S)-AC6t 

11*8151 

BOSS0046 

^000460-, 

B66=(AI6.6I-A(6. 

11*8161 . . ._ 

.. BOSSOU4 7 

. 000467.. 

B&7=(A(6.7i-A(6* 


BGSSCD4B 

000477 

B6a=(Al6.8|-A(6. 

11*8181 

0QSSOO49 

000&06-,. 

869=(AI6.9I-A(6. 

1I*B19) 

BDSSij050 

000516 _ 

B72^(A(7i2)-A(7^ 

U#B12» 

ROSS0051 

000525.. 

873=1 A(7, 3 1-A17. 

11*8131 

BOSSOU52 


B74“IA( T»4)-AI 7, 

il fBl4J . . - .. ^ 

B0SSl.a53 

000544.. 

B75=tAl7.5HA{7* 

1)46151 

BOSSOJ54 

-000&54 

B76=(A(7.6J-A(7. 

U4B161 

ROSS0055 

000563 - 

877=UC7.7J-A{ 7. 

11*0171 

BOS 60056 

00Q573 

B7a=U(7.8)-At7. 

11*8181 .... 

BQSS0D57 

000602 

879=CAi7,9 I-A17, 

11*8191 

RDSSQ05a 

-,D006L2 

Ba2=(A(a.2]-At8t 

11*8121 . - - 

BOSS 0059 

00Q621 

B83=< AI8i3 l~A(». 

11*8131 ' 

BOSSj063 

00063U 

B84=lA(a.4 1-A18. 

11*8141 

BC]SS006l 

000640 

B85=(A18f5)-A(a. 

11*8151 

BGSS0Q62 

.000650 

BB6=(A(a.6 J-AtB« 

11*816) 

BOSS0063 

000657 

B87'=IAtBi7l-A(Bt 

11*8171 

BOSSOa64 

00C46T 

.B8S=lA(8t8>-AI8i 

11*8181 _ 

. aossao65 

000676^ 

Ba9=U(8t9)-A{8. 

11*819) 

BOSS0066 

000706^, 

C23=B23/B22 


BOSS0067 

000710 . 

C24= 824/1122 


BOSSOOGB 

0D071L 

C25=B25/h22 


BCSS0069 

JJ0P713 

C26= 826/822 

... 

BQSS007Q 

.000714 

027=827/822.. .. 


, -BOSS 0071 

000716 

C2a=H28/H22 

. 

BQSS0072 

*000720 ^-. ,, 

C29= 829/822 


BOSS0073 

P0Q7Z1.-- 

r:i3=(ttl3-B12«C23} 

BOSSOJ74 

000724. 

C14=IU14-B124C24> . - 

BOSS0075 


00Q7?7 

0OQ732. 


00073S 

0007<^0 _ 


(m5~Sl2«C2S) 
(B16-ai2«C2bJ. 
Cl7=lttl7-ai2*C27) 
Cl8s(HL8-Ul2*C2al 


tl5 
XI 6 


BDSS0076 
BOSS 007 7. 
BOSS0073 
BaSS0079 


^00 07 A3.-: 

000746 

.000751 

-000754.. 

^007^7 

-000762.- - 

-Q0076S 

000770 .. 
000773 
00c;76 
.001001.. 

00 100^ 
.001007 
_001012 . 
^01015 . 
-O0L02G .. 

jaOJLD23 . 

-001026. . 

*00103:1. 

JJ01034- 

0Q1G37 

.001042 

-001045 

-001050 

-001053 

-0Q1D56 

J)0ifl61_ . . 

-DO 064 

-QOI1L6I - 

0Q1072- 

-001075 

.001100 

-001103 

.00X106.-. . 

JXOJJLU 

-001114 

-OOILIZ 

*Q01I22 

001125 

001130 „ 

001133 

-001136 

-0QU41 


( iS 4 ' 


Cl9siai9" 

.C33=r(&33 

C34=(ii4A- 

- C35=<B35- 

X36^?(B36- 

* C37=(ii37- 

C3a=(B3a- 
C39=tS39- 
C43=(343‘ 
044;== (9 44- 

- C45=(9 45- 
C 4=6- (a 46- 
C47=(947- 

.C49=(B40* 
C49=(949- 
C53 
,...C'54 

C55=( n55- 
. C5ir-(»J56- 
C5/=(ab7* 

L5w-(B5a- 

C59-ia59- 

C63=(a63' 

£64“ (3 64- 
*C65=(865- 
. C66=(366- 
C67==(B67- 

„*-C69=(B69- 
C73=CB73- 
£74=^(8 74' 
G75==tH75- 
. C7o=(376 
.. £77=<B77- 

£79=^(8 79- 
X83^(BB3- 
. C84=IB84- 

— C85=(B35- 

- Ca6 = (B36- 
Ca7-(Ba7’ 

— C8a=(B8fl' 
_ Cfi0slH89- 


Bl 24 «C 29 l 

B32«*C23J 

B32«C24J 

B32<^C25> 

B32»£26J 

B 32 <'C 27 J 

B J2«C2BJ 

B32«C29J 

B42«=C2J J 

B42=^£24J 

3 42 <^£23 ) 

B42*C26J 

B42*C27) 

042*C2B) 

rJ 42 =?=C 29 ) 

832«C2Jl 

B 52 frC 24 U 

B52<'G25I 

8 52<=C2o} 

B52^C27) 

aS 2 ^C 28 J 

B52»C291 

B62=^C23K 

B62<^C24) 

B62 «C2S J 

B62«C26> 

B62«G27I 

B62»^C28)-. 

8o2^C29K 

B72^C23) 

B72frC24) 

R72*C23> 

B/2<«C27) 

B72<*C28). 

B72«C29) 

682*0231 

B82*C241 

R 82*C2SJ 

0a2«C26J 

3B2#C27i-, 

382*G28) 

Bd2^C29J 


bossoobo 

BOSSOOdl 

Qosscoaz 

B0SS0083 

80350084 

BOSS 00 03 
80SS0086 
BDSS00B7 
BQSSOOdB 
8QSSLiJd9 

aossQjoa 

BO5S0J9I 
0DS5OO92 
BOSS J093 
60550094 
B0550095 

BOSS 0096 

B05SJ097 
B0SS0098 
BQSS0099 
BOSSOlOO 
BQSSJlOl 
. . 6DSS0102. 
B0SS0103 
. 80SS0104 

B05SO10S 
&OSS01J6 
B0SS0107 

DD5SJ108 

BOSS 01 U9 
RUSSOllO 
6QSS0IU 
60S SQ 112 
BQ550113 

B0SS0114 

BQSS0115 
BDSS0U6 
B0SS0U7 
BD55J118 
BQSS0L19 
„ .. . uaSS 0 l 2 Q 
8QSS012I 
BOSS0122 


rw 






] 


I 

I 


-001144 — 
.001146 

00U50 

001161 . - 
^fa01l53 


D34»C34/C33 

03S-C3 5/W.33 
036=CT6^^C33 
D37=CJ7/C33 _ - . 

. 03fi=C38/C33 


00L1S.» 

00US6 

. OOU6L 

00i;64 

0OU67- 

,00llT? 

.031175 .. 
0Q120Q. 
0Cti203 . _ 
.001206 . 
001211 ... 
_Q012i4.__ 


t)3SsC39/C33 - 
DI«=|C14-C13»034> - . 

015=(C15-C13*035» 
Ol6=JC16-Cl3«D3tt) 
D17=(Ci7-Gl3*037) . 

0L3= 1C IB-C13»03al 

U19=1C19-C13*0391 
U24= ( C24-C23‘s=D34 1 
U25=1C25-C2J«‘D35) 
D26=tC26-C23*0Jbl 
0?7=tC27-r,23*D37t 
02a=tC28-C23*D3dl 


001217.. 

001222 . . 
001225 
001230 
00li33 -. 

_001236 

001241 

. 001244 

. QD1247_ 


D29=IG29-C23«039I 
D44=1C44-G43*034I 
»45=lCt5-f.43«'0351 
04u»(C46-C4J«D36l 
D47=CC47-C43*03n 
. D4a=<C48-C43<'D3a) . ... 
D49=(C49-C43frlJ39) 
054= I C54-C 5340341 
055= 1C55-C 53*0351 


..001252- . .. 056=IC56-G53*D3ol 

001255 057=1G57-C53*I)371 

.001260 i358=tC5B-G53*03ai 

001263 059=IC59-G53*0391 

.001266... U64=IC64-C63*034l 

.0di27l.. .. 065=1C65-C63*D351 

,.0dl274 066=lC6b-C630D361 

.001277. U67=IC67-C63*037I 

_O0t 3Q2.. 06 8= i C68-C 0341) 38 1 

.oaiaos.. 069=CG69-CoJ*D39) 

..do 1310 074= CC74-C 73*0341 

.0^1311 075=IC75-C73*03SI 

doi3l6_. . .1)76= (C 76-073*0361 

00 I 321- -- 077^(0 77-073*037) 

001324 078=1078-073*0381 

-001327 - 079=1079-073*039) 

.001332- . . 084=1004-083*0341 




80SS0123 
30SS0124 
BUSS0L25 
30SSOL26 
BGSS0127 

BnsS 0128 

BQSS0129 

B0SS013C 

Bossom. 

80550132 

8DSS0133 

BDSS0134 
BQ5S0135 
U 0550 136 
00550137 
80550138 

B05S0139 

0DSSO14O 

B055JL41 

80550142 

80550143 

B05SOI44 

BOSS0145 . 

B0S50146 

BQS50147 

60550148 . 

BOSS0149 

BU5S0150 

30550151. 

B05S0152 

0QS5O153 

BOSS01S4 

BOSS0155 

80550156 

BC5S0157 

BOS50LS8 

B05SO159 

BOSS0160 

80550161 

80550162 

.BOSSOlbi . 

80550164 

BOSSOlbS 


OteM^.£iA.G£i IS 
OF POOR QTSALOT 


.! -_00l:i3& - 085stC85-Ce3#D35I - 

, 001340- 086=*(t86-C83#D36) . 

; .-001343 - OflT^JCerT-CBJOOS?) 

i ._001346 .DB8=lC8B-Ca3’SI)38J 

[» _QmJ51 089= C C 89-083*039 1 . 

' _JQ01354_ E45=D45/!IA^ 

t _J)Ql33£i- .. . E'f6=046/D44 

f -001360. . £47=047/044 

,k - 001361 . 648=048/044 

X _ 001363— £49=049/044 

f —001364 £lS=tOl5-014*£4ai 

? ...001367 El8=I0l6-014*E46l ■ - 

: — Q01372 E17=t017-D14*E47I 

.,001376 £18=1018-014*6481 

y —001400.. £19=1019-014*6491 

iy —001403— £25= (025-024*6451 . _ 

i -001.406 E26=1026-D24*E461 

t -001411 E27=(D27-024*£47J 

-001414 . E28=(0''e-024*E4a) 

f -001417 E29=(029-024=fc49) 

. 001422 . E35=1035-034*E451 _ 

-001423 . E36=1U36-034*E46» 

f Q Q143 Q E37=1037-034*E471 

: -001433 E3B=(U38-D34*E4B1 

; -001436 E39=1D39-D34*E49I 

i -D0144L E55=(055-054*E451 - - 

i;S -001444 £56=1056-054*6461 • • 

t -.001.447 ... £57=1057-054*6471 - - . . 

iii -001452 £58=1058-054*648) — 

! ,001455 .. £59=1059-054*6491 - 

? -001460 £65=1065-064*6451 _ 

i; -001463 666=1066-064*6461 

H -001466 „ E67=1D67-U64*E47) 

ij .001471 .. E6a=(068-064*£48) .. 

iv -001414: E69= 1069-0 64*£49) 

|f -00147X . £75= 10 75-074*645 ) 

■V .001502 £76=1 076-074*6461 .. 

-00150S 677=(D77-074*E471 _ , 

r .001510 E7H=l078-074*F4ai - 

y 001513 E79=1U79-U74*£491 ... 

,i)ClS15 £05*1085 004*6451 

ii .001521 £86=1086-084*6461 

‘I -001524 E87=I087-0«4*E47I . 


is 



OP — 





BOSS0166 

BQSS0167 

BOSS016G 

aassoi69 

... . - ... BDSS017G 

SOSS0171 

aD3St>l72 

3tlSS0l73 

tiUSSGL74* 

BOSS0175 

. Bt3bSGi76. 

BQi*bD177 - 
aGbSJi7b 
BOSS U 1 79 
BDSSGItiO 
BOSSJIBI 

flossoitta 

BOSS0183 

BGS501B4 

BUSS01B5 

BCi^SOitib 

BCSS01B7 

BQSsoiaa 

BOSSOU9 
BOSS0190 . .. 

BOSS0191 
- . BDSS0192 

110SS0193 - - 

. BOSS0194 

BUSS0195 

k5OSS0l96 

BrjSS0197 

BnS5oi9a 

0QSSai99 

BOSS020a 

B0SSO2OL 

aQSS 02 G 2 

BQSSJ2Q3 

6GSSG209 .. . 

B0SS0205 . - . 

BDSS02Q6 

BGSSG207 - 

RDSSQ208 


001577 - - 
00155? . 

001535 . 

. 001537 

_00154J 

001 547 _ 
001544. - 

00 \ 547 

001552 . 
001555 „ 

j)oiS6a 

001563^ 
001566 . . 

. 001571 

001574. 
.001577.- 

-001602 

. Q0 L60S... 

001610 

.001613_. 

.001616 

00i6?l 

..OOL62.4 

.001627.-. 

001632 

.001635 

..001640 — 
.001643... 

.QC164A 

001651 — 

001654 

.0ftl657-_. 

.001662 . 

001665— 

.001670 - 

001672... 

001674 

001675 

001700—. . 

001703 

001706 

001711 „ 
.001714 -. 


£88= (088^084*1-481 -- - • - 

B89=I085-D84*E491 
F56=£5i//B55 . ' 

F57=t57/f55 

FSa=t5a/E55 

F59=E59/E55 . . . ._ 

F16=iE16-E15*F56l . . 

FI7=(ei7-E15*£57J „ 

Fl8=(E18-E15*F5ai 

Fly=(El9-E13*F591 

_ _ EZ6=1E26-E25*F561 

. .F27=t£27-E25*F57) . - 

. F2a=IE23-e25*F53) 

.. F29=(E29-E25*F591 . 

. F36=IE36-E35*F56) . 

F37=(E37-E35*F57) - .. 

...F38=(E38--E33’i‘F5ai 

F39=(E39-E35*F59) 

F46=(E46-E4&*F56» 

. F47=(E4T-E45*F57) 

. F48=(E48 E45*F5B) 

F49=IE49-E45*F59» ... . 



F67=tE67-*E6S«F57> . . * 

H6U=(.E6a-E65*F5aj 

F69^(E69-Eot><‘F59l . 

F7Cj=^iH76-E75«F56) . 

F77=«E77'-E75*F57i . 

_ FIB=t£7B-E75*F58i 

F79=U79-^E75<^F59) . 

F86=lEa6-E85«F56J 
F87^IEB7“E85frF57) ^ 

FBS=1£B8-E85*F58I 
F89:=tEQ9-EB5*E59/E5S) 

^ li67=F6 7/Fo6 . .. . 

G6B=r6d/Fb6 
G69=F69/F66 
ra 7- I F17-F16*G6 7) 
rafi=(F i8~Fi6*G6a» 

. , C19=CF l9-Fl6«'Go9) 

. . G27«IF27-F^6^G67> 

G28=lF2B-F20»G6dJ 

G29=^(F29-F26*G69J 


flOSS0209 
BQSS0210 
811550211 
80550212 
BOSS 0213- 
BOSS 02 14 
BOSSJ215 
BGSS0216 
0OSSJ217 
BX}$S02id 
BOSSU219 
BQSS0220 
0OSSO221 
B0SS0222 
BDSSD223 
BG5S0224 
BOSS 0223. 
BOSS0226 
B0SS022? 
80550228 
UDSS0229 
BDSS0230 
BQ5S02J1 
00550232 
80550233 
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C’J' SUQROLiTIME PLOTS GIVES PLOTS OF THE SOLUTIGNS OF THE EGUATiDNS ♦ 

C« OF MOTION. 1«E.» PLOTS OF THE ANGLES AND ANGULAR VELOCITIES AS A ? 

CP function of time, plots of theta vs phi are ALSO PRUVIOED, ♦ 

CP .._ . ♦ 

CP PROPRIETARY^ » 

CP ‘ . ♦ 

CP .NONE-.,- ... 

CP . # 

CP USE .. _ ♦ 

CP CALL PLOTS P 

CP - . , - . _™ .... . ♦ 

CP PARAHETElis „ . . . P 

CP . . . . . . . _ P 

CP NONE P 

CP AlJlHOa/IMPLLMENTQR - . ; ' ♦ 

CP , * . - ‘ . ♦ 

CP D,R*i}ORSEY.JR - -fl.SEAY . . j(t 

CP * .... .... ^ 

CP DATE RELEASEO ♦ 

CP SEPTEMBER 14.1973 _ _ .7"^ "*7 ♦ 

CP . - - . . . P 

CP LATEST REVISION ♦ 

CP . « 

GP .. SEPTEMBER 14.1973 ^ ♦ 
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C . THIS IS A DUMMY SUBROUTINE TO SATISFY THE LOADER. 

C IT HAS BEEN DECIDED THAT THE PLOTTING ROUTINES FOR PROGRAM 

C LACATE CAN BEST BE HANDLED AS POSTPROCESSOR ROUTINES RUN 

C SEPARATELY*? ROM LACATE. FOR PLOTS OF THE SOLUTIONS GF THE _ 

C EOUATIUNS OF MOTION. REFER TO PROGRAM AVPLOT. FOR THE TWO- 

C DIMENSIONAL THETA-PHI PLQTSflREFEK TD PROGRAM TPPLQT. 



Figure la, MCATE Balloon System - General Structure 








Figure 4« Plariar Stacked Gust Profile Parallel to Azimuth. 
Plane 



Figure 5. Planar Stacked Gust Profile Rotated about 
Azimuth Plane 




















